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Frey. (IBM Research and Yale University). The particular 
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The body of the manual was edited and composed on APL\360 
using variations of a text-processing package designed and 
implemented by M. M. Zryl (IBM Research), and patterned 
after a Fortran system due to A. P. Mullery (IBM Research). 
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PART 1 


GAINING ACCESS 


indefinite number of typewriter-like terminals. A certain 
number of these terminals may be simultaneously linked to 
the computer, according to the number and type of access 
ports on the computer. 


This part of the manual describes the terminal 
equipment required for interacting with the system, tells 
how to establish a connection between a terminal and the 
central computer, and gives, in simplest form, the 
procedures for starting and ending a work session. 


PHYSICAL EQUIPMENT 


A remote terminal for use with the system must be 
either an IBM 2741 Communications Terminal, an IBM 2740-1 
Communications Terminal equipped with the Transmit Control 
feature, or an IBM 1050 Teleprocessing Terminal. It may 
connect to the central computer through the dial-up 
telephone network, by a leased telephone line, or by private 
wire. 


Dial-up connections are effected by means of a Western 
Electric Dataset #103A-2 or the equivalent, or a compatible 
acoustic coupler. A leased telephone line connection 
requires the use of a Western Electric Dataset #103F-2 or 
the equivalent. A direct-wired connection is effected by 
means of an appropriate IBM line adapter (modem). In the 
last case, two-wire connections should be avoided, if 
possible, since their use rules out an interrupt facility. 


Preferred features. The APL\360 system will work with many 
variations of the terminal types given above, but certain 
features and options are desirable. Dial-up connections 
provide the greatest flexibility, both in overall system 
configuration, and in certain details of operation. 
Similarly, although the APL printing element is based on a 
12-pitch font, and is available in both Selectrice and 
PTTC/BCD keyboard encoding (i.e., the correspondence between 


FEATURE OR OPTION 


Control Unit 
Voltage (115 AC), Non-lock plug 
Dataset Attachment 
Dial Up 
Transmit Control 
Automatic EOB 
Typamatic Keys 
Interrupt 
Text Time-out Suppression 
First Printer Attachment 
Automatic Ribbon Shift Select 
Typing Table 


9881 

9114 

3255 

8028 

Do not use 
NA 

RPQ F17913 


RPQ E27283 
NA 

RPQ E27428 
9698 

4408 

1295 

9705 


Printer-Keyboard 1052-2 
APL Printing Element, PTTC/BCD 1167988 1167988 1167988 
or Standard Selectric® | NA 1167987 1167987 
Keys, APL Keyboard RPQ M40174 | RPQ M40174 | RPQ M40174 
Character Spacing, 10 per inch 9104 9104 9104 
Line Feeding, 6 per inch 9435 9435 9435 
Accelerated Carrier Return 1006 NA NA 


Notes. 


NR: feature is standard equipment, or is not required. 
NA: not available (July 1968). 
The numbers are IBM-domestic identifications. 


Table 1.1: RECOMMENDED FEATURES AND OPTIONS FOR TERMINALS 


keyboard layout and character positions on the printing 
element), specification of 10-pitch character spacing and 
Selectric® encoding will allow a greater variety of printing 
elements to be used with the terminal. While it is not 
essential, the convenience of having the interrupt feature 
cannot be overestimated. 


Paper tape equipment (1054-1 Reader and 1055-1 Punch) 
and punched-card equipment (1056-1 Reader and 1057-1 Punch) 
can be used with IBM 1050 terminals. The punched-card 
facilities should have Extended Character features 3861 and 
3860, for reader and punch, respectively. 


IBM identifications for recommended terminal features 
and options are given in Table 1.1. Complete specifications 
for terminals, and information on other options, should be 
obtained from local IBM representatives. 
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Figure 1.2: APL\360 KEYBOARD 


THE APL CHARACTER SET 


The APL\360 keyboard is shown in Figure 1.2. The 
numerals, alphabetic characters, and punctuation marks 
appear in their usual places, aithough the alphabet is used 
in only a single case: letters print as upper-case italics, 
but are produced only when the keyboard is in lower-case 
position (i.e., not shifted). 


The special characters, most of which are produced with 
the keyboard shifted, generally have some mnemonic 
connection with their alphabetic or numeric correspondents. 
This may be appearance (w over W), Greek-Roman equivalence 
(0 over 8), sequence (< < = 2 > # over 3 45 6 7 8), or some 
-- possibly far fetched -- relationship between the APL 
function represented by the symbol and the letter (* over P 
for power, ' over K for "kwote", and [ over 5 for ceiling). 


Use of other character sets. The part numbers of APL 
printing elements are given in Table 1.1. However, any 
printing element may be used with the APL system, since the 
encoded characters generated by the keyboard and transmitted 
to the computer are independent of the particular element 
mounted on the terminal. Subject to programmed 
intervention, the transmitted information will always he 
interpreted according to the APL keyboard characters. 


Non-APL printing elements are frequently useful in 
conjunction with special-purpose APL programs designed to 
exploit their character sets. Also, any element that 
matches the keyboard encoding (Selectric® or PTTC/BCD) of 
the terminal can be used for straightforward numerical work, 
since letters and digits print properly with such elements. 
The visual interpretation of complex APL expressions is, of 
course, awkward with any but an APL printing element. 
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THE RECORDING TERMINAL 


As connections with 


remote terminals 


are established 


and broken, and users start and end work sessions, a printed 


traffic 
This 


record of this 

not necessarily, | 
ordinarily attended by 
Operation of the 
contact for users. 


There are 


an APL Operater who monitors 
system, and provides a 


certain supervisory functions, 


the operation of APL\360, which 


the recording terminal. 


Thus, 
privileged position relative to others. 


is generated at the system's 
terminal, which is usually, but 
located at the central computer site, is 


the 
common point of 


essential to 
can be effected only from 

this terminal holds a 
The enrollment of 


new users, and the allocation of library space, are examples 


of this kind of function. 


ESTABLISHING A CONNECTION 


The directions that follow assume 


connection with a dataset. 


acoustic couplers 


I 


the use of a dial-up 
nstructions for the use of 


should be obtained from their suppliers. 


Where terminals are connected to the computer by leased 
lines or private wires, instructions on dialing procedure 
(EC2) are irrelevant, but local sources of information 
should be consulted for equivalent procedures. 

ACTION NOTES 
ECl. Set up terminal: 
Insert paper, mount an APL 
printing element, connect 
terminal to power source, 


and set switches as follows: 
IBM 2741 or 2740 Terminal 


COM 
ON 


LCL/COM 
Power 


The power switch is at the 
right of the keyboard. On 
2741's, the LCL/COM switch 
is on the left side of the 
terminal stand, toward the 
rear; on 2740's, it is to 
the right of the power 
switch. 


IBM 1050 Terminal 


ATTEND/UNATTEND ATTEND 
Keyboard SEND 
Printer SEND- RECEIVE 
Reader 1 OFF 
Punch 1 OFF 
EOB MANUAL 
Line test OFF 
Single step OFF 
Line control ON 
Power ON 
On 2741 and 2740 terminals, 


if the keyboard 
by trying the 
shift key. If the key is 
operable, press the carrier 
return and test again. 


test to see 
is locked 


EC2. Dial computer: 

Set the telephone pushbutton 
switch to TALK and follow 
ordinary dialing procedure. 
After two rings, at most, 
the telephone will respond 
with a steady, high-pitched 
tone. 


Not all 1050's have all 
switches; those present must 
be set as indicated. The 
states of switches not 
listed here are immaterial. 


If it is known that RPO 
E27283 (see Table 1.1) is 
installed, set the EOB 
switch to AUTO. 


The line control switch is 


inside the rear door of the 
1051 Control Unit. The 
power switch is on the left 


side of the control unit, | 


toward the front. 


If the keyboard does not 
lock after a carrier return, 
check the switches and try 
once more. If the switches 
are set properly and _ the 
keyboard remains unlocked, 
the terminal is faulty. 


Telephone numbers are given 
in Table 1.3. If the line 
is busy, try a different 
number or call the APL 
Operator to inquire about an 
open line. 


123 456-7890 123 456-7890 
Insert a table of access 
telephone numbers here. 
An assistance number 
should be included. 


123 456-7890 


APL Operators 


Table 1.3: TELEPHONE NUMBERS 


Promptly set the pushbutton The DATA button should 


switch to DATA by holding light, and will remain lit 
the DATA button down firmly as long as the terminal is 
for a moment and then connected to the computer. 
releasing. If it does not light, check 

the power connection to the 
Cradle the handset. dataset. If it lights, but 


quickly goes out, check the 
power connection to the 
terminal, the cable 
connection to the dataset, 
and the switch settings on 
the terminal. Then retry 
from ECl. 


Response: The keyboard will 
unlock, indicating that the 
computer is ready to accept 


an entry from the terminal. 


The connection established by the foregoing procedure 
is only tentative, and will be broken by the central 
computer if further communication does not take place within 
60 seconds. Therefore, the next step -- the sign-on 
procedure (EC3) given below -- should be executed promptly. 


ENTRIES FROM THE KEYBOARD 


After a connection is established, normal communication 
between a terminal and the central computer is carried on by 
means of entries from the typewriter keyboard, which 
alternately locks and unlocks as each entry is made and the 
computer completes its work. The general procedure is to 
indicate the end of the message, and follow this by a 
transmission signal. 


Transmission Signals. The transmission signal is generated 
differently, according to the terminal type and its 
equipment: 


2741. A transmission signal is automatically generated in 
the proper sequence (i.e., after the carrier return 
Signal) when the RETURN key is struck. 


2740. The transmission signal is produced by striking the 
EOT key after the RETURN key. (Do not use the the EOB 
key, or the automatic EOB feature available on these 
terminals.) 


10590. On terminals equipped with an automatic EOB RPQ 
(see Table 1.1), the transmission signal is produced 
automatically when the RETURN key is struck. Otherwise, 
an EOB must be produced manually, by striking the 
numeral-5 key, while the key marked ALTN CODING is 
held down. (Note that the automatic EOB feature available 
for 1050 terminals cannot be used with APL\360.) 


A transmission signal does not cause a _ character to be 
printed, and its omission will therefore be evidenced only 
by the state of the terminal: the keyboard will remain 
unlocked, and no response will be forthcoming from the 
system. 


In the remainder of this manual the need for carrier 
return and transmission signal will not be explicitly 
mentioned, since they are required for every entry. 


Mistakes. Before the carrier return (and transmission 
signal) that completes an entry, errors in typing can be 
corrected as follows: backspace to the point of error and 


then depress the linefeed button (marked ATIN on 2741 
terminals). This will have the effect of erasing everything 
to the right of, and including, the position of the carrier. 
The corrected text can be continued from that point, on the 
new line. 


This procedure can be used at any time once the sign-on 
(EC3) has been accomplished. In case of error in the 
sign-on itself, the entry should be made as is. The system 
will provide an appropriate trouble report, following which, 
a correct entry may be made. 


Transmission errors. There are occasional transient 
failures in the communication between a terminal and the 
central computer. Lt the failure occurs during the 


transmission from the terminal, the system will respond with 
a resend signal: on 1050 terminals, the RESEND warning 
light will go on, and on other terminals the message RESEND 
will be printed. In any case, the last entry from the 
keyboard must be repeated. The warning light on the 1050 
should first be extinguished by pressing the adjacent 
button. 


Failures in the other direction are usually evidenced 
by the appearance of a spurious character, whose presence in 
the printed output is obvious in most contexts. However, 
there is no absolutely certain way of detecting such a 
failure. 


Special features of IBM 1050 terminals. ‘The keyboard of a 
terminal eguipped with a REQUEST button will not unlock, 
when it otherwise should, until the button is depressed. On 
terminals equipped with a timer, the keyboard will lock 
before an entry is completed if approximately 18 seconds 
have elapsed since the last keyboard action. Locking can be 
forestalled by occasionally striking the shift key, but if 
it does happen, the keyboard can be forced to unlock by 
flipping the line-control switch inside the 1051 Control 
Unit to OFF, and back to ON. 


If a terminal is to be used exclusively with APL\360, 
the Keyboard Request feature should be removed, and the Text 
Time-out Suppression feature should be added. 


STARTING AND ENDING A WORK SESSION 


Each user of the system is assigned an account number. 
This number is used to effect the sign-on that initiates a 
work session; serves to partially identify any work that the 
user may store in the system between sessions; and is used 


for accounting or billing purposes. 


If the account number is net known, or if one of the 
troubie reports given below is encountered and not 
understood, a message of inguiry can be sent to the APL 
Operator. This is accomplished by entering )OPR followed by 
a space and one line (not exceeding 120 characters) of an 
appropriate text. 


Such a message can be sent at any time after a 
connection has been established. It causes the keyboard to 
lock, awaiting a reply. If no reply is forthcoming, (and 
the sign-cn has not been completed), the connection will 
have to be broken and re-established before further 
communication with the system is possible. (After the 
sign-on, the keyboard may be unlocked by an attention 
Signal, described in Part 2.) 


ACTION NOTES 
EC3. Sign on: The use of passwords as 
Enter ) locks and keys is described 
followed by an account in Part 2. A new user will 
number, with a key (i.e., a have been advised if a key 
colon and password), a is required for his first 
required, Sign-on. 


Effe 
1. 


ct: 
A workspace will be 

activated for the terminal. 

of 


Dé Accumulation time 


charges will begin. 


1. A Boedcndt message from 


the APL Operator may be 
printed. 
2. The port number, time of 


day, date, and user name 
associated with the account 
number will be printec on 
one line. The system 
identification will be 
printed on another line, 


A workspace can be thought 
of as both a notebook and a 
scratch pad. The details 
are explained in Part 2. 


Trouble reports: 
NUMBER NOT IN SYSTEM 
means either exactly what it 


says, or that the number has 
a lock associated with it 
and the wrong key was used. 
The APL Operator should be 
consulted if help is 
required. 

INCORRECT SIGN-ON 

means the form of the 
transmitted command was 
faulty. Retry with a 


properly formulated sign-on. 


ALREADY SIGNED ON 
means that a work session is 


already in progress at the 
terminal. To start a 
session with a different 


account number, use command 
TC5 (see Part 2), which ends 
the current session but 
holds the connection, and 
retry from the beginning of 
EC3. 


NUMBER IN USE 


means just that, or a 
temporary condition due to 
delays in the central 
computer. Retry from EC2 
after two minutes. If the 
condition persists, notify 


the APL Operator. 


NUMBER LOCKED OUT 

means that authorization for 
use of that number has been 
withdrawn. 


3. SAVED, followed by the 
time of day and date that 
the activated workspace was 
last stored. 


4. The 
unlocked, 


keyboard will be 


A work session 


becomes available, once the 


is started, 
sign-on is accomplished. 


This response will be 
omitted if the activatec 
workspace is clear (i.e., 
not holding information)... 
If the respense is given, 
the workspace is named 
CONTINUE. The use of 
workspace names is explained 
in Part 2. 


If this is the only reponse, 
a transmission error hes 
occurred, or the entry did 
not start with an APL right 
parenthesis. In either 
case, the entry should be 
repeated in correct form. 
If the condition persists, 
retry from EC2, possibly 
dialing a different number. 


and the full APL system 


Any 


System command of Part 2 or APL operation of Part 3 may now 


be entered for execution. 


Limited Use of the System. No 
sign-on given here is required 


3, and the reading of Part 
only casual or 


For the purposes of such 
conveniently be terminated 
procedures: 

ACTION 
EC4. Disconnect dial-up 


connection: 
Set the power switch to OFF, 


1. The active workspace will 
be stored under the name 
CONTINUE, 


restricted use 


system command other than the 
in order to make use of Part 
may therefore be deferred if 
is to be made of the system. 


use, a work session may 

by one of the following 
NOTES 

Use this procedure for 


dial-up connections only. 


If the workspace is clear, 
it will not be stored at 
this time. If it is stored, 


it will be automatically 
re-activated when the same 
account number is next used 
to sign on. See note for 


EC3, Response 3. 


1.10 


2. The duration of the work 
session and the amount of 
computer time used wil! be 


noted internally for later 
accounting. 

3. The connection to the 
central computer will be 
broken. 

Response: None. 

EC5. Break any connection: 
Enter )CONTINUE 

Effect: 

1. 2. and 3. The same as for 
EC4, 

Response: 

1. Time of day and date, 


followed by CONTINUE 


2. The port number, time of 
day, date, and user code 
will be printed. 
3s Accounting information 
will be printed. 


The DATA light will go out. 


This is command Tc4, 
detailed in Part 2. 


Trouble reports: 

NOT WITH OPEN DEFINITION 
INCORRECT COMMAND 

The meanings of these 
reports, and corrective 
actions for them, are given 
in Part 2. 
User codes comprise three 
characters which partially 
identify users. Their use 
is explained in Part 2. 


connection is 
DATA light 


If a dial-up 
being used, the 
will go out. 


PART 2 


SYSTEM COMMANDS 


APL operations deal with transformations of abstract 
objects, such as numbers and symbols, whose practical 
significance, as is usual in mathematics, depends upon the 
(arbitrary) interpretation placed upon them. System 


commands in the APL\360 System, on the other hand, have as 
their subject the structures which comprise the system, and 
control functions and information relating to the state of 
the system, and therefore have an immediate practical 


significance independent of any interpretation by the user. 


In this Part the. structure of the APL\360 system is 
described, and various notions essential to the 
understanding of system commands are introduced. Finally, 
the complete set of system commands is described in detail. 


WORKSPACES AND LIBRARIES 


Workspaces. The common organizational unit in the APL\360 


system is the workspace. When in use, a workspace is said 


to be active, and it occupies a block of working storage in 
the central computer. The size of the block, which is 
preset at a fixed value for a given system, determines the 
combined working and storage capacity of each workspace in 
that system. Part of each workspace is set aside to serve 
the internal workings of the system, and the remainder is 
used, as required, for storing items of information and for 
containing transient information generated in the course of 
a computation. 


An active workspace is always associated with a 
terminal during a work session, and all transactions with 


in calculations always refer to objects known by those names 
in the active workspace; information on the progress of 
program execution is maintained in the state indicator of 


the active workspace; and control information affecting the 
form of output is held within the active workspace. 


Libraries. Inactive workspaces are stored in libraries, 
where they are identified by arbitrary names. They occupy 
space in secondary storage facilities of the central 
computer and cannot be worked with directly. When required, 
copies of stored workspaces can be made active, or selected 
information may be copied from them into an active 
workspace. 


Libraries in APL\360 are either private or public. 
Private libraries are associated with individual users of 
the system, and are identified by the user's account number. 
Access to them by other users is restricted in that one user 
may not store workspaces in another person's library, nor 
can he obtain a listing of the workspaces already stored 
there, However, one user may activate a copy of another 
user's (unlocked) workspace if he knows the library number 
and workspace name. 


Public libraries are identified by numbers below 1000. 
They are not associated with individual users, although 
certain ones may be reserved by general agreement for groups 
of people working cooperatively. Anyone may store 
workspaces in a public library, and a listing of workspace 
mames is available upon request if the library number is 
known. However, a workspace stored in a public library 
remains under the control of the user who put it there, and 
cannot be altered by others. 


NAMES 


Names of workspaces, functions, variables, and groups 
(see workspace control commands) may be formed of any 
sequence of alphabetic (A to Z, and 4 to JZ) and numeric (0 
to 9) characters that starts with an alphabetic and contains 
no blank. Only the first 11 characters of workspace names, 
and the first 77 characters of other names are significant. 
Longer names may be used, but additional characters beyond 
these limits are ignored. 


The environment in which APL operations take place is 
bounded by the active workspace. Hence, the same name may 
be used to designate different objects (i.e., groups, 
functions, or variables) in different workspaces, without 
interference. Also, since workspaces themselves are never 
the subject of APL operations, but only of system commands, 
it is possible for a workspace to have the same name as an 
object it holds. However, the objects within a workspace 
must have distinct names, except as explained below. 


Local and global significance. In the execution of defined 
functions it is often necessary to work with intermediate 
results which have no significance either before or after 
the function is used. To avoid cluttering the workspace 
with a multitude of variables introduced for such transient 
purposes, andto allow greater freedom in the choice of 
names, the function definition process (see Part 3) provides 
a facility for designating certain variables as local to the 
function being defined. Variables not so designated, and 
all functions and groups, are said to be global. 


A local variable may have the same name as a global 
object, and any number of variables local to different 
functions may have the same name. 


During the execution of a defined function, a local 
variable will supersede a function or global variable of the 
same name, temporarily excluding it from use. If the 
execution of a function is interrupted (leaving it either 
suspended, or pendent, see Part 3), the local variables 
retain their dominant position, during the execution of 
subsequent APL operations, until such time as the halted 
function is completed. System commands, however, continue 
to reference the global homonyms of local variables under 


these circumstances. 


LOCKS AND KEYS 


Stored workspaces and the information they hold can be 
protected against unauthorized use by associating a lock, 
comprising a colon and a password of the user's choice, with 
the name of the workspace, when the workspace is stored. In 
order to activate a locked workspace or copy any information 
it contains, a colon and the password must again be used, as 
a key, in conjunction with the workspace name. Listings of 
workspace names, including those in public libraries, never 
give the keys, and do not overtly indicate the existence of 
a lock. 


Account numbers can be similarly protected by locks and 
keys, thus maintaining the security of a user's private 
library and avoiding unauthorized charges against his 
account. 


Passwords for locks and keys may be formed of any 
sequence of alphabetic and numeric characters up to eight 
characters long, without blanks. Characters beyond the 
eighth are ignored. In use as either a lock or key, a 
password follows the number or name it is protecting, from 
which it is set off by a colon. 


ATTENTION 


Printed output at a terminal can be cut off, or the 
execution of an APL operation can be interrupted, and 
control returned to the user, by means of an attention 
Signal. Since the keyboard is locked during printing or 
computing, the signal must be generated by means other than 


one of the standard keys. 


On terminals equipped with an interrupt § feature, the 
attention signal is generated by depressing the appropriate 
key once, firmly. On IBM 2741 terminals this key is usually 
Of a distinctive color, and is marked ATTN. (The same key 
is used for linefeed when the keyboard is not locked.) 


For terminals not so equipped, the attention signal is 
generated by momentarily interrupting the connection to the 
central computer. The method depends upon the type of 
connections: 


with dial-up telephones, uncradle the handset, set 
the pushbutton switch to TALK for two to three 
seconds, and then reset it to DATA; 


with leased telephone lines, set the terminal power 
switch to OFF and then back to ON, with deliberate 
speed. 


If the connection is broken, in either case, for more than 
five seconds, the central computer will interpret this as a 
Signal to end the work session and will execute action EC4 
of Part l. 


Following an attention signal the keyboard will unlock, 
and the type carrier will return to the normal position for 


input (six spaces from the left margin). If the carrier 
does not do this, enter blank lines repeatedly until it 
does. In some cases a line will be printed before the 


keyboard unlocks, telling where a function in progress was 
interrupted. 


Except for communication commands (and then only if the 
delivery of a message is delayed), the execution of system 
commands, once entered, cannot be interrupted. However, the 
printed responses or trouble reports following a_ system 
command can be suppressed by a properly timed attention 
Signal. 


USE OF SYSTEM COMMANDS 


are distinguished in form by the requirement that system 
commands be prefixed by a right parenthesis, which is a 
syntactically invalid construction in APL. 


There is some system control which it may be desirable 
to exert dynamically, and there are some items of system 
information which can be profitably used during the 
execution of a program. For these purposes APL\ 360 provides» 
appropriate system-dependent functions and library 


functions, which can be used like other APL operations. 
These functions are described in Part 3 and Part 4, 
respectively. Where a system command duplicates the action 
of one of them, this fact will be noted in the description 


of the system command in this Part. 


All system commands can be executed when the terminal 
is in the execution mode, in which APL operations are 
executed forthwith upon entry. However, in definition mode, 
in which sequences of operations are being composed into 
functions for later execution, commands which call for 
storing a copy of the workspace, or which might otherwise 
interfere with the definition process itself, are forbidden. 
(The two terminal modes are treated more fully in Part 3.) 


Classification of commands. System commands are 


conveniently grouped into five classes with regard to their 
effect upon the state of the system: 


1. Terminal control commands affect the relation of a 
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2. Workspace control commands affect the state of the 


ts SS 


active workspace. 


3. Library control commands affect the state of the 


Ff po 


libraries. 


4, Inquiry commands provide information without 
affecting the state of the system. 


5. Communication commands effect the transmission of 


messages among terminals. 


The text that follows is based upon this 
classification, although it will be seen that certain of the 
terminal control commands also affect the libraries, and one 
of the library control commands may sometimes affect the 
state of the active workspace. 


Normal responses and trouble reports. Any entry starting 
with a right parenthesis will be interpreted by the system 
as an attempt to execute a system command. When the command 
is successfully executed, the normal response, if any, will 


be printed. This response is given in the description of 
the action for each command. 


If, for any reason, a command cannot be executed, an 
appropriate trouble report will be printed. The most common 
report is INCORRECT COMMAND. This means that the command 
was incomplete, mis-spelled, used a wrong modifier, or was 
otherwise malformed. The corrective action in every case is 
to enter a properly composed command. The meanings and 
corrective actions for other trouble reports are given in 
the notes accompanying the description of each command. 


indicating that the active workspace has been replaced by a 
clear workspace. (The attributes of a clear workspace are 
given in the section on workspace control commands, see 
WCl.) This situation rarely arises, but the probability of 
its occurrence is slightly higher during the execution of 


system commands. 


Summary. The purposes, forms, responses, and trouble 
reports for all system commands are summarized in Table 2.1. 
Where the first word of a command form is more than four 
characters long, only the first four are Significant. The 
others are included only for mnemonic reasons, and may be 
dropped or replaced, as desired. For example, )CLEAR, 
)CLEA, )CLEAVER, etc., are all equivalent. 


In general, the elements of a command form must be 
separated by one (or more) spaces. Spaces are not required 
immediately following the right parenthesis, or on either 
side of the colon used with passwords, but can be used 
without harm. 


Reference and Purpose 
COMMAND FORM 1'-2.3 


NORMAL RESPONSE TROUBLE REPORTS 4 


TCL Sign on designated user and start a work session. 

)NUMBER [KEY] [TEXT]; PORT, TIME,DATE,USER; SYSTEM; [SAVED ,TIME,DATE] 123 4 5 
Tc2 End work session, 

)OFF [LOCK] PORT, TIME,DATE, USER CODE; TIME USED 16 
TC3 End work session and hold dial-up connection. 

JOFF HOLD [LOCK] PORT, TIME, DATE, USER CODE; TIME USED 16 
TcC4 End work session and store active workspace. 

)CONTINUE [LOCK] (TIME,DATE,CONTINUE]; PORT,TIME,DATE,USER CODE; TIME USED 6 16 
Tc5 End work session, store active workspace, and hold dial-up connection, 
)CONTINUE HOLD [LOCK] {TIME,DATE,CONTINUE]; PORT, TIME,DATE,USER CODE; TI 
WCL Activate a clear workspace. 

)CLEAR CLEAR WS 16) 
WC2 Activate a copy of a stored workspace. 

)LOAD WSID [KEY] SAVED , TIME ,DATE 7 8 16 
Wwc3 Copy a global object from a stored workspace. 


ME USED 6 16 


)COPY WSID [KEY] NAME SAVED , TIME, DATE 678 910 16 
WC3a Copy all global objects from a stored workspace. 

)COPY WSID [KEY] SAVED , TIME, DATE 6 7810 16 
wWC4 Copy a global object from a stored workspace, protecting active workspace. 

)PCOPY WSID [KEY] NAME SAVED ,TIME,DATE; [VOT COPIED:,LIST OF OBJECTS] 678910 16 
WC4a Copy all global objects from a stored workspace, protecting active workspace. 

)PCOPY WSID [KEY] SAVED ,TIME,DATE; [NOT COPIED: ,LIST OF OBJECTS] 6 7 8 10 16 
wce5 Gather objects into a group. 

)GROUP NAME [Ss] NONE 11 16 
WC6 Erase global objects. 

JERASE NAME [S] {NOT ERASED: ,LIST OF OBJECTS] 16 
WC7 Set index origin for array operations. 

JORIGIN INTEGER, 0-1 WAS , FORMER ORIGIN 16 
wC8 Set maximum for significant. digits in.output. 

)DIGITS INTEGER, 1-16 WAS ,FORMER MAXIMUM 16 


wc9 Set maximum width for an output line. TROUBLE REPORT FORMS 


)WIDTH INTEGER, 30-130 WAS , FORMER WIDTH Ll WUMBER NOT IN SYSTEM 
WC1LO Change workspace identification. 2 INCORRECT SIGN-ON 

)WSID WSID WAS ,FORMER WSID 3 ALREADY SIGNED ON 
LCL Re-store a copy of the active workspace. | 4 NUMBER IN USE 

)SAVE TIME, DATE ,WSID 5 NUMBER LOCKED OUT 61213 14 
LCla Store a copy of the active workspace. 6 NOT WITH OPEN DEFINITION 

)SAVE WSID [LOCK] TIME , DATE 7 WS WOT FOUND 61213 14 
LC2 Erase a stored workspace. 8 WS LOCKED 

)DROP WSID TIME, DATE 9 OBJECT NOT FOUND 7:14 
IQL List names of defined functions. 10 WS FULL 


JFNS [LETTER] FUNCTION NAMES 
IQ2 List names of global variables. 


ll NOT GROUPED, NAME IW USE 
12 NOT SAVED, WS QUOTA USED UP 


)VARS [LETTER] VARIABLE NAMES 13 WOT SAVED, THIS WS IS WSID 
IQ3 List names of groups. 14 IMPROPER LIBRARY REFERENCE 

)GRPS [LETTER] GROUP NAMES 15 MESSAGE LOST 
IQ4 List membership of designated group. INCORRECT COMMAND 

)GRP NAME FUNCTION NAMES, VARIABLE NAMES 16 
IQ5 List halted functions (state indicator). 

)SI SEQUENCE OF HALTED FUNCTIONS 16 
IQ6 List halted functions and associated local variables (augmented state indicator). 

)SIV SEQUENCE OF HALTED FUNCTIONS WITH NAMES OF LOCAL VARIABLES 16 
IQ7 Give identification of active workspace. 

\WSID WSID 16 
IQ8 Uist names of workspaces in designated library. 

)LIB [NUMBER] NAMES OF STORED WORKSPACES 14 16 
IQ9 List ports in use and codes of connected users. 

)PORTS PORT NUMBERS AND ASSOCIATED USER CODES 16 
IQ10 List port numbers associated with designated user code. ; 

_)PORTS CODE PORT NUMBERS 16 


CML Address text to designated port. 
)MSGN PORT [TEXT] SENT 15 16 
CM2 Address text to designated port, and lock keyboard. 


)MSG PORT [TEXT] SENT 15 16 
CM3 Address text to recording terminal (APL Operator). 

JOPRN [TEXT]~ SENT 15 16 
CM4 Address text to recording terminal (APL Operator), and lock keyboard. 


)OPR [TEXT] SENT 15 16 
Notes: 1. Items in brackets are optional. 
2. KEY or LOCK: a password set off from preceding text by a colon. 

3. WSID: library number and workspace name, or workspace name alone, as required. 
4. See insert table of trouble report forms. 


Table 2.1: SYSTEM COMMANDS 


2.7 


TERMINAL CONTROL COMMANDS 


There is one command for starting a work session, and 
there are four commands for ending one. The variations in 
ending allow for automatically storing a copy of the active 
workspace, and for holding a dial-up telephone connection to 
the central computer for an immediate start of another work 
session. The starting command has been described in Part 1 
(EC3). 


Forced endings. Any action that interrupts a telephone 
connection for more than five seconds will cause the work 
session to end, and usually cause a copy of the active 
workspace to be stored. This provides a safeguard against 
loss of work in case of failure in the telephone circuits, 
Or accidental loss of power at the terminal. It is also the 


basis of the disconnect action described in EC4 of Part l. 


As ina disconnect, a copy of the active workspace is 
usually stored automatically. The bounce may be used when a 
port is required for a special purpose, or to clear the 
system of all users before stopping the APL\360 operation 
completely. 


If a work session is ended because of failure of the 
central computer, the active workspace is not stored. 


The CONTINUE workspace. When the active workspace is stored 
automatically, as a result of a disconnect, bounce, or one 
of the continue commands described below, it goes into the 
user's private library and is given the name CONTINUE. If£ 
the active workspace had a password associated with it, 


CONTINUE will be locked with the same password. 


If CONTINUE is automatically stored, and is not locked, 
it will be automatically activated at the next sign-on; 
otherwise, a clear workspace is activated. 


Since CONTINUE will replace any workspace that may have 
been previously stored under that name, there is a danger 
that repeated line failures, while working with a locked 
workspace, could lead to a complete loss of information. To 
protect against this possibility, a clear workspace is never 
stored automatically. 


Interrupted activities. An APL operation in progress at the 
moment of occurrence of a bounce or disconnect may or may 
not be carried to its normal conclusion. A defined function 
in progress at such a moment will be suspended, but its 
progress can be resumed at a later work session in 
accordance with the procedures given in Part 3. A system 
command, once begun, will continue to completion regardless 
of the state of the terminal. 


If a bounce or disconnect occurs when the terminal is 
in definition mode, the definition process is arbitrarily 
terminated by the system. To proceed with the definition 
when CONTINUE is next activated, the definition mode can be 
re-established according to the procedures given in Part 3. 
The continue commands will be rejected in definition mode. 


Detailed description. The trouble reports WO SPACE and 


also omitted from the notes below, because their occurence 
is infrequent, and no corrective action can be taken from a 
remote terminal. They can arise in response to a_ continue 
command or a save command (see section on library control), 
and signify that certain of the physical resources of the 
system have been exhausted. 


Elapsed time or time of day, given as a_ system 
response, is always in hours, minutes, and seconds; two 
digits for each, separated by periods. A date response is 
given as month, day and year; two digits for each, separated 
by slashes. Clock hours are counted continuously from 
midnight of the indicated day, and if the system runs past 
midnight it is possible to have time readings well above 24 
hours. For example, 34.22.00 07/11/68 would be 22 minutes 
past 10 AM on July 12, 1968. 


ACTION NOTES 
TCl. Start a work session: See Part 1, EC3. 
This ‘is the sign-on, 


described in EC3 of Part l. 


T¢2. End work 
Enter )OFF 
followed by a colon and a 
password, if desired. 


currently active 


workspace will vanish. 


of the work 
and the amount of 
computer time used will be 
noted internally for later 
accounting. 


2. The duration 
session 


3. The password, if used, 
will become a new lock on 
the account number. 


4. A dial-up connection to 
the central computer will be 
broken, 


Response: 

l. The port number, time of 
day, date, and user code 
will be printed on one line. 


2 Accounting information 
will be printed on two 
lines, giving terminal 
connection time and central 
computer time. 


Passwords longer than eight 
characters are accepted, but 
only the first eight are 
meaningful. Spaces around 
the colon are neutral. 


There is no effect on any 
stored workspace. 


Once applied, a lock stays 
in effect until explicitly 
changed by an ending command 
that contains a colon. 


An existing lock is removed 
if no password follows the 
colon. 


If acolon is not used, the 
existing lock, if any, 
remains in force. 


Trouble report: 
INCORRECT COMMAND 


The time used in this 
session and cumulative time 
since the last accounting 
are given in the standard 
format, for both terminal 
time and computer time. 


The DATA light on telephone 
datasets will go out. 


TC3. End work session and 
hold dial-up connection: 
Enter )OFF HOLD 

followed by a colon and a 


password, if desired. 


Effect: 

1. 2. and 3. Same as for 
TC2,. 

4. The dial-up telephone 
connection will be 


maintained for 60 seconds, 
pending a new sign-on. 


Response: 

1. and 2. Same as for TC2. 
Tc4. End work session and 
store active workspace: 


Enter )CONTINUE 
followed by a colon and a 
password, if desired. 


1. A copy of the currently 
active workspace will be 
stored in the user's private 
library with the name 
CONTINUE« If the workspace 
had been activated from a 
stored workspace with a 
lock, the same lock will be 
applied to CONTINUE. 


2. 3. and 4. 
TC2. 


Same as for 


See note at TC2. 


An attention signal at this 
time may cause the 
connection to be broken. 


INCORRECT COMMAND 


See note at TC2. 


A bounce has the same effect 


and response as this 
command. A disconnect has 
the same effect, but no 
response. 


This effect will not take 
place if the active 
workspace is not holding 
information. 


When the workspace is saved 
it replaces any workspace 
previously stored with the 
name CONTINUE. 


Response: 
1. Time of day and date, 
followed by CONTINUE. 


2. and 3. Same as 
response 1 and 2. 


for. 1C2, 


followed by a colon and a 
password, if desired. 


1. Same as for TC4, 
2. and 3. Same as for TC2. 


4. Same as for TC3. 


1. 2. and 3. Same as for 


This response will be 
omitted if the workspace was 
not saved. See note at 
Effect 1. 


NOT WITH OPEN DEFINITION 
means that the terminal is 
in definition mode. Close 
the definition by entering 
the character V. (See 
mechanics of function 
definition in Part 3.) 


INCORRECT COMMAND 


See note at TC2. 


NOT WITH OPEN DEFINITION 
See TC4. 


INCORRECT COMMAND 


WORKSPACE CONTROL COMMANDS 


The commands in this class can replace the active 
workspace with a clear one, or with a copy of a_ stored 
workspace; bring together in the active workspace 
information from many stored workspaces; form groups within 
the active workspace; remove unwanted objects from the 
active workspace; and set controls governing certain 
operations. No command in this class affects any but the 
active workspace. 


Application packages. The usefulness of a terminal system 
is enhanced by the availability of many different 
collections of functions and variables, each of which is 
organized to satisfy the computational needs of some area of 
work; for example, standard statistical calculations, 
exercises for teaching a scholastic subject, complex 
arithmetic, business accounting, text editing, etc. The 
workspace-centered organization of APL\360 lends itself to 
such packaging, because each collection moves as a coherent 
unit when the workspace containing it is stored or 
activated. 


The copy commands provide a convenient way to assemble 
packages from components in different workspaces. The 
group command makes it convenient to have a multiplicity of 
more specialized packages in a single workspace, sharing 
common elements, but available individually by copying the 
appropriate group. 


Groups. The group command assigns a single name to a 
collection of names, in order to provide more convenient 
reference to selected functions and global variables. The 
group name can subsequently be used for three purposes: to 
move a copy of the entire set of referenced objects between 
workspaces, to incorporate the group members within another 
group, and to erase, in a single operation, all objects 
referenced by the group. Each of these is further explained 
below, in connection with the relevant operation. 


Information transfer between workspaces. Information 
entered or developed within one workspace can be made 
available within another by means of the copy and 
protecting-copy commands, which reproduce within the active 


workspace objects from a stored workspace. These are two 


sets of parallel commands which differ only in their 
treatment of an object in the active workspace which has the 
Same name as an object being reproduced: the copy commands 
will replace the existing object, whereas the 
protecting-copy commands will not make the replacement. 


A copy command of either type can be applied to an 
entire workspace or to a single object (i.e., a function, 
variable, or group). When an entire workspace is copied, 
all the functions and global variables within it are subject 
to the operation, but its index origin and output control 
settings, state indicator, and local variables are left 
behind. 


When a group is copied without protection, both its 
definition (i.e., the group name and the collection of names 
composing the group), and the objects referenced by the 
names within it, are reproduced in the active workspace. 
When copied with protection, the group itself, or any of the 
objects referenced by its members, will be omitted in order 
to protect an object in the active workspace. If the group 
definition is successfully copied under these circumstances, 
the names composing it will refer to the global objects by 
those names in the active workspace, regardless of whether 
they were copied with the group or present before. 


Detailed Description. The term workspace identification is 
used here to mean either a library number followed by a 
workspace name, or a workspace name alone. When a name is 
used alone, the reference is to the user's private library. 


A key is a colon followed by a password. 


ACTION NOTES 
wel. Activate a clear This command is used to make 
workspace: a fresh start, discarding 
Enter )CLEAR. whatever is in the active 

workspace. 

Effect: 
1. A clear workspace will be A clear workspace has no 
activated, replacing the variables, groups, or 
presently active workspace. defined functions. 


Its control settings are: 
index origin, 1; significant 
digits, 10; line width, 120. 


Its workspace identification 
does not match that of any 
stored workspace. (See 
section on library control.) 


2.14 


1. CLEAR WS 


WC2. Activate a copy of 


Ip 
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Enter )ZOAD 

followed by a space and a 
workspace identification 
(with the key, if required). 


Effect: 

1. A copy of the designated 
workspace will be activated, 
replacing the presently 
active workspace. 


Response: 

1. SAVED, followed by the 
time of day and the date 
that the source workspace 
was last stored. 

WC3. Copy a global object 
from a stored workspace: 


followed by a space and a 
workspace identification 
(with the key, if required), 
followed by a space and the 
name of the object to be 
copied. 


Effect: 

1. A copy of the designated 
object will appear in the 
active workspace with global 
significance, replacing 
existing global homonyms. © 


Trouble report 
INCORRECT COMMAND 


This command may be used to 
obtain the use of any 
workspace in the system 
whose identification (and 
password) is known. 


Trouble reports 


WS NOT FOUND 


means there is no stored 
workspace with the given 
identification. 

WS LOCKED 

means that no key, or the 


wrong key, was used when one 
was required. 


INCORRECT COMMAND 


A global 
group, function, or 
variable. 


object may be a 
global 


When applied to a group, all 
copy commands operate both 
on the group definition and 
on objects referenced by the 
group members. 


Members of a group do not 
necessarily have referents; 
but a group member without a 
referent in the source 
workspace may find one in 
the active workspace. 


1. SAVED, followed by the 
time of day and the date 
that the source workspace 
was last stored, 


workspace: 

Enter )COPY 

followed by a space and a 
workspace identification 
(with the key, if required). 


1. A copy of all functions, 
groups, and global variables 
in the source workspace will 


appear in the active 
workspace with global 
Significance, replacing 


existing global homonyms. 


NOT? WITH OPEN DEFINITION 
means that the terminal is 
in definition mode. Either 
close the definition by 
entering V, or defer the 
copy Operation. 


WS NOT FOUND 
See WC2. 


WS LOCKED 
See WC2. 


OBJECT NOT FOUND 

means that the designated 
workspace does not contain a 
global object with the given 
name. 


WS FULL 

means that the active 
workspace could not contain 
all the material requested: 
if copied at all, a variable 
will be copied completely; a 
partially copied function 
will leave the terminal in 
definition mode; some 
objects may be completely 
overlooked. Status may be 
determined by using appro- 
priate inquiry commands. 


INCORRECT COMMAND 


See notes at WC3. 


Local variables, the state 
indicator, and settings for 
origin, significant digits, 
and width are not copied. 


Response: 
1. SAVED, followed by the 
time of day and the date 


that the source workspace 
was last stored. 


we4. Copy a global obiect 
from a stored workspace, 
protecting the active 
workspace: 


Enter )PCOPY 

followed by a space and a 
workspace identification 
(with the key, if required), 
followed by a space and the 


name of the object to be 
copied. 

Effect: 

1. A copy of the designated 
object will appear in the 
active workspace unless 
there is an existing global 
homonym. 

Response: 

1. SAVED, followed by the 
time of day and the date 
that the source workspace 


was last stored. 


2. NOT COPIED:, followed by 
the names of objects not 
copied, will be printed if 
appropriate. 


NOT WITH OPEN DEFINITION 
WS NOT FOUND 

WS LOCKED 

WS FULL 

INCORRECT COMMAND 

See WC3 for all meanings. 


See notes at WC3. 


When 


copied, any member 
perforce, refer to 


referent of its homonym. 


NO? WITH OPEN DEFINITION 
WS NOT FOUND 

WS LOCKED 

OBJECT NOT FOUND 

WS FULL | 

INCORRECT COMMAND 

See WC3 for all meanings. 


2017 


a group definition is 
whose 
referent was blocked will, 


y all global See notes at WC3. 
xr a 


workspace, protecting the 
active workspace: 

Enter )PCOPY 

followed by a space and a 
workspace identification 


(with the key, if required). 


Effect: 

1. A copy of all global See note at WC3a, Effect 1. 
objects in the source 

workspace which do not have See note at WC4, Effect 1. 


global homonyms in the 
active workspace will appear 
in the active workspace. 


Response: Trouble reports 
1. SAVED, followed by the NOL WITH OPEN DEFINITION 
time of day and the date WS NOT FOUND 
that the source workspace WS LOCKED 
was last stored. WS FULL 
INCORRECT COMMAND 
2. NOT COPIED:, followed by See WC3 for all meanings. 


the names of objects not 
copied, will be printed if 
appropriate. 


Enter )GROUP 
followed by a 
or more names 
spaces. 


space and one 
separated by 


Effect: 

1. The first name will be 
the name of a group having 
the other names as members, 
subject to the rules given 
in the adjacent notes. An 
existing group with the same 
name will be superseded. 


2. If only one name is used 
in the command, no group is 
formed, and an existing 
group by that name is 
dispersed. 

Response: None. 


The first name used in the 
command must not be the name 
of a function or global 
variable. 


Any name may be a member of 
a group; names of groups, 
functions, and global 
variables, and names without 
current global referents are 
all acceptable. 


Members may be added to an 
existing group by using the 
group name twice in the 
command: as the first name 
and as another. 


When a group is dispersed 
the group definition is 
destroyed, but the referents 
of the group members are 
unaffected. 


NOT GROUPED, NAME IN USE 
means that the first name 
used in the command is the 
name of a function or global 
variable. Erase the 
offending object, or usea 
different name. 


INCORRECT COMMAND 


Enter )FRASE 
followed by a 


space and the 


names of objects to be 
deleted, separated by 
spaces, 
Effect: 
1a Named objects having 
global significance, other 


than pendent functions, will 
be expunged. 


Response: 

NOT ERASED:, followed by the 
names of functions not 
erased will be printed, if 
appropriate. 


WC7. Set index origin for 
array operations: Enter the 
characters )ORIGIN 

followed by a space and a 0 


or l. 

Effect: 

1. First elements of arrays 
in the workspace will be 
numbered zero or one, as 
indicated, and subsequent 


use of index-dependent APL 
operations will be 
appropriately affected. 


Response: 
l. WAS, followed by the 
former origin. 


This is the only way to 
remove a global variable, 


and the most convenient way 
to remove a collection of 
objects. 


Names which do not refer to 
global objects are ignored. 


When a group is erased, both 
the group and the referents 
of its members are expunged. 


INCORRECT COMMAND 


A dynamically executable 
equivalent function is 
available (see Part 4). 


These matters 
in Part 3. 


are explained 


Trouble report: 
INCORRECT COMMAND 


WC8. Set maximum f 
nificant digits in 9 
Enter )DIGITS 
followed by a space 
integer between 1 


inclusive. 


and an 
and 16 


1. Subsequent output of 
numbers will show no greater 
number of significant digits 
than indicated. 


Response: 
1. WAS, followed by the 
former maximum. 


wo9. Set maximum width for 
an output line: . 
Enter )WIDTH 

followed by a space and an 
integer between 30 and 130 
inclusive. 

Effect: 

1. Subsequent output of all 
kinds, except messages 
between terminals, will be 
limited to a line width no 
greater than the number of 


spaces indicated. 


1. WAS, followed by the 
former maximum width. 


A aynamically executable 
equivalent function is 
available (see Part 4). 


This command has no effect 
on the precision of internal 
calculations, which is 


approximately 16 decimal 
digits. 

Trouble report: 

INCORRECT COMMAND 

A dynamically executable 
equivalent function is 


available (see Part 4). 


neither the 
stops nor 
length of 


This affects 
mechanical margin 
the allowable 
input lines. 


INCORRECT COMMAND 


wclo. Change workspace This command can be used to 


identification: guard against inadvertently 
Enter )WSID changing a_ stored workspace 
followed by a space and a that has just been loaded; 
workspace identification. and conversely, to enable 
the replacement of a stored 
workspace without first 


using the drop command, when 
the active workspace came 
from a different source. 
(See section on library 
control commands.) 


Effect: 

1. The active workspace will See command LCl for the 
assume the specified implications of this. 
identification. A lock 

associated with the 


workspace will be retained. 


Response: Trouble report: 
1. WAS, followed by the INCORRECT COMMAND 
former workspace 

identification. 


LIBRARY CONTROL COMMANDS 


There are two basic Operations performed by the 
commands in this class. The save commands cause a copy of 
an active workspace to be stored ina library, and the drop 
command causes such a stored copy to be destroyed. 


The save commands and the load command are symmetric, 
in the sense that a load command destroys an active 
workspace by replacing it with a copy of a stored workspace, 
while a save command may destroy a_ stored workspace by 
replacing it with a copy of the active workspace, 


Continuity of work. When a workspace is stored, an exact 
copy of the active workspace is made, including the state 
indicator and intermediate results from the partial 
execution of halted functions. These functions can be 
restarted without loss of continuity (see Part 3), which 
permits considerable flexibility in planning use of the 


system. For example, lengthy calculations do not have to 
be completed at one terminal session; student work can be 
conducted over a series of short work periods, to suit class 
schedules; and mathematical experimentation or the 
exploration of system models can be done over long periods 
of time, at the investigator's convenience. 


Workspace identification. A library number anda _ name, 
together, uniquely identify each stored workspace in the 
system. An active workspace is also identified by a library 
number and a name, and as copies of stored workspaces are 
activated, or copies of the active workspace are stored, the 
identification of the active workspace may change according 
to the following rules: 


1. A workspace activated froma library assumes the 
identification of its source. 


2. When a copy of the active workspace is stored, the 
active workspace assumes the identification assigned to 
the stored copy. 


36 The library number and name may be arbitrarily 
changed by the use of command WC10. 


4. A clear workspace activated by a clear command, a 
sign-on, or a system failure is called CLEAR WS, which 
cannot be the name of a stored workspace. 


The identification of active workspaces is used in two 
ways. First, as a safeguard against the inadvertent 
replacement of a stored workspace by an unrelated ones an 
attempt to replace, by a copy of the active workspace, any 
stored workspace other than the one with the same 
identification (or the one named CONTINUE), will be stopped. 
Second, as a convenience when the active workspace is to be 
re-stored with changes: the use of the command )SAVE, 
without modification, implicitly uses the identification of 
the active workspace. 


Library and account numbers. A user's account number is 


also the number of his private library. The numbers of 
to any account number. 


Fach stored workspace has implicitly associated with it 
the account number signed on at the terminal from which the 
save command was entered, and may not be either replaced or 
erased, except from a terminal signed on with the same 
account number. Thus, a user is prevented from affecting 


the state of another user's private library, or tampering 
with public library workspaces which he did not store. He 
may, Of course, activate a copy of any workspace stored in 
the system, if he knows the library number and name (and 
password, if required). 


Storage allotment. A user of APL\360 is assigned library 
Space in terms of the maximum number of stored workspaces he 


may have at one time. This quota applies to the combined 
total of workspaces stored either in his private library or 
in public libraries. The allotment for each user is 


determined by those responsible for the general management 
of a particular system, and can be changed from the 
recording terminal, as required, within the bounds of the 
physical resources of the system. 


Up to the number in his quota, a user may assign 
arbitrary names to the workspaces he stores. ' Beyond that 
point he always has available one workspace named CONTINUE 
in his private library. 


Use of the CONTINUE workspace. This workspace has the 
property that it may be freely replaced by an active 
workspace having any identification whatsoever. It is thus 
always available as temporary storage, but carries with it 
the danger of being easily replaced, as described in the 


section on terminal control commands. 


The attributes of the CONTINUE workspace are the same 
whether stored as a result of a continue command, 
disconnect, or bounce, or stored by virtue of a save command 
using that name. In the last case, the active workspace 
assumes the name CONTINUE, as it would any other name under 
like circumstances. 


Purging a workspace. The sequence of commands, 
)SAVE ABC123, )CLEAR, )COPY ABC123, will purge the active 
workspace, Clearing it of all but its functions, groups, and 
global variables, and reset its controls (see WCl). This 
often results in more usable space than can otherwise be 
realized. Subsequently, the commands )WSID ABC123 and 
)SAVE may be used to store a copy Of the purged workspace 
under its former name. 


Detailed Description. The 


term workspace identification 


will be used with the same significance as for the workspace 


control commands. 
ACTION 
LCl. Rer-stere a copy of the 


active workspace: 
Enter )SAVE 


Effect: 

1. A copy of the active 
workspace will replace the 
stored workspace with the 


same identification. 


2. A password associated 
with the active workspace 
will continue in effect, and 
the stored workspace will be 
locked with this password. 


Response: 

1. The time of day, date, 
and workspace identification 
will be printed. 


NOTES 


New workspaces can be stored 
by this command only if the 
identification of the active 
workspace has been changed 
by WC10. 


This forestalls inadvertent 
omission of a lock while 
actively engaged with a 
confidential workspace. 


Trouble reports: 

NOT WITH OPEN DEFINITION 
means that the terminal is 
in function definition mode. 
Either close the definition 
by entering VY, or defer the 
save operation. 


WOT SAVED, WS QUOTA USED UP 

means that the allotted 
number of stored workspaces 
has previously been reached. 
Unless this is increased, 
the workspace can be stored 
only by replacing a 
workspace already stored. 
CONTINUE may be replaced 
directly; any other must be 
erased first, or the 
identification of the active 
workspace must be made to 
match by WC10. 


LCla. 


Store a copy of the 
active cca 
Enter )SAVE 
followed by a space and a 
workspace identification, 
with a colon and password, 
if desired. 
Effect: 
l. A copy of the active 
workspace will be stored 
with the designated 


identification, and with the 
assigned lock, if a password 
was used, 


2. The active workspace will 
assume the workspace 
identification used in the 
command, 


NOT SAVED, THIS WS TIS 


CLEAR WS 
results from the fact that 
CLEAR WS.cannot be the name 
of a stored workspace. 
Either change the name by 


WCl10, or use LCla. 


IMPROPER LIBRARY REFERENCE 
means that an attempt was 
made either to replace a 
stored workspace that is not 
under control of the account 
number signed on at the 
terminal, or to store into a 
non-existent library. 


INCORRECT COMMAND | 
of the save 


allows new 
added to a 


This form 
command 
workspaces to be 


library more conveniently, 
and permits locks to be 
added or removed from 


. workspaces already present. 


A stored workspace with the 
same identification will be 
replaced. 


A lock on a stored workspace 
will not be retained if the 
command does not include a 
lock explicitly. 


To this extent only, this 
command may affect the state 
of the active workspace. 


Response: 
1. The time of day and date 
will be printed. 


LC2.. 
space: 
Enter )DROP 

followed by a space and a 
workspace identification. 


Erase a stored work- 


Effect: 
1. The designated stored 
workspace will be expunged. 


Response: 
1. The time of day and date 
will be printed. 


Trouble reports: 
NOT WITH OPEN DEFINITION 


means the same as for LCl. 


NOT SAVED, WS QUOTA USED UP 
means the same as for LCl. 


NOT SAVED, THIS WS IS 


followed by identification 
of the active workspace, 
means a stored workspace 


with the identification used 
in the command exists, but 
this identification does not 
match that of the active 
workspace. 


IMPROPER LIBRARY REFERENCE 
means the same as for LCl. 


INCORRECT COMMAND 


Since a key is not used, a 
locked workspace whose key 
has been lost can always be 
removed from the system. 


This command has no effect 


‘on the active workspace, 
regardless of its 
identification. 


Trouble reports: 
IMPROPER LIBRARY REFERENCE 


means that an attempt was 
made to drop a workspace 
stored by another user. 


WS NOT FOUND 


means that there is no 
stored workspace with the 
identification used in the 
command. 


INCORRECT COMMAND 


INQUIRY COMMANDS 


Most of the commands in this class concern the state of 
the active workspace. Of the others, one command lists the 
names of workspaces in libraries, and two commands are 
useful for locating another user at a connected terminal, in 
order to communicate with him. 


User codes. The communication commands described in the 
next section require that the port number of the person to 
be addressed be known. The inquiry commands that provide 
this information operate through the device of user codes, 
which serve within the system as partial identification of 
users. (The user account numbers, which completely identify 
users within the system, are not used for this purpose, and 
are treated as private information.) A user code comprises 
the first three characters of his name, as it appears in the 
Sign-on response (Part 1, EC3, Response 2). 


A user code is considered to be only partial 
identification because it may not be unique. Therefore, 
these commands should be used advisedly: before addressing 
substantive messages to a terminal which has been identified 
by a user code, further confirmation of the receiver's 
identity should be sought. 


IQl. List names of defined 


Enter )FNWS 
followed by an alphabetic 
character, if desired. 


Effect: None. 

Response: _. _ Zxrouble report 

1. The names of defined INCORRECT COMMAND 
functions in the active 

workspace will be printed 

alphabetically, starting 

with the specified letter. 

If a letter was not used, 

all function names will be 

listed. 


2.28 


po 


followed by an alphabetic 
character, if desired. 


Effect: None. 


1. °The- names of global 
variables in the active 
workspace will be printed 
alphabetically, starting 
with the specified letter. 
If a letter was not used, 
all names of global 
variables will be listed. 


IQ3. List names of groups: 
Enter )GRPS 

followed by an alphabetic 
character, if desired. 


Effect: None. 
Response: 


1. The names of groups in 
the active workspace will be 


printed alphabetically, 
starting with the letter 
used. If a letter was not 


used, all group names will 
be listed. 


Trouble report 
INCORRECT COMMAND 


Trouble report 
INCORRECT COMMAND 


mbership of 
Enter )GRP 
followed by the 
group. 


name of the 


Effect: None. 
Response: 

1. The names in the 
will be printed, 


group 


IQ3- List halted functions: 
Enter )SI 

Effect: None, | 

Response: 

De The names of halted 
functions will be listed, 
most recent ones first. 


With each name will be given 


the line number on which 
execution stopped. Suspend- 
ed functions will be 


distinguished from pendent 
functions by an asterisk. 


There will be no response if 
there is no group with the 
designated name in the 
active workspace. 


INCORRECT COMMAND 


The line numbers on which 
halted functions have 
stopped are available for 
dynamic use through _ the. 
system-dependent functions 
I26 and 127. (See Part 3.) 


This display is the state 
indicator; its significance 
and use is explained in Part 


° 


Enter )SIV 


Effect None. 

Response: 

1. The response will be the 
same as for I1Q5, except that 
with each function listed 
there will appear a listing 
of its local variables. 


Enter )WSID 


None. 


Response: 
1. The identification of the 
active workspace will be 
printed. The library number 
will be included only if it 
differs from the account 
number 
terminal. 


IO8. List 
workspaces: 
Enter )LIB 
followed, if necessary, by a 
library number. 


Effect: None. 

Response: 

1. The names of workspaces 
in the designated iL Tprary 


will be printed. T£& no 
number was used, the account 
number associated with the 
terminal will be taken as 
the library number. 


associated with the 


Trouble report 
INCORRECT COMMAND 


Trouble report 
INCORRECT COMMAND 


A library number is not 
required for listings of the 
user's private library. 


a2 SSS SS OO SS eS ee 


means that an attempt was 
made to obtain a listing of 
another user's private 
library, or of a 


non-existent library. 


INCORRECT COMMAND 


2109. List port 
codes of connec 


ict 1M 
1D 
Iu Ir 
Ic 
io 
Ik 
In 
o 


Enter )PORTS 


Effect: None, 

Response: Trouble report 

1. Port numbers in use will INCORRECT COMMAND 
be printed with the 

associated user code, 


ZQl0. List port numbers User codes are not 
associated with desig- necessarily unique, and the 
nated user code: information derived from 
Enter )PORTS this command and IQ9 should 
followed by the user code. be used advisedly. 

Effect: None. 

Response: Trouble report 


1. The port numbers of INCORRECT COMMAND 
connected users identified 
by the code will be printed. 


COMMUNICATION COMMANDS 


There are two pairs of commands in this class. One 
pair addresses any connected terminal, and one pair 
addresses only the system recording terminal. 


A message can be received by a terminal only when its 
keyboard is locked, and except for public address 
announcements from the system recording terminal, only if it 
is also not in the process of function execution. Hence, to 
facilitate two-way communication, one of each pair of 
communication commands results in locking the keyboard of 
the sending terminal, pending the receipt of a reply. A 
keyboard so locked can be unlocked by an attention signal. 


Incoming messages from the system recording terminal 
are prefixed by OPR:, and public address messages are 
prefixed by PA!:. The latter will interrupt the execution 
of defined functions, but the point of suspension will be 
printed, and execution can be resumed without loss of 
continuity, as explained in Part 3. 


If the interaction at a terminal must be interrupted 
for a prolonged period while the terminal is still 
connected, it is good practice to lock the keyboard so that 
a message may be received. This can be done by addressing a 
message of the proper type to the terminal's own port 
number. 


Detailed description. The length of a message is restricted 
to a single line, not exceeding 120 characters in length. 
However, messages are not subject to the width settings of 


either the sending or receiving terminal. 


ACTION NOTES 
CM1. Address text to desig- A message addressed to an 
nated port: unused or non-existent port 
Enter )MSGW will be reflected back to 
followed by a port number the sending terminal, which 
and any one-line text. then plays the role of both 


sender and receiver. 


1. The keyboard will lock 
while the text is being 
transmitted. 


2. The text will be printed 
at the receiving terminal, 
prefixed by the port number 
of the sending terminal. 


3. The keyboard will unlock 
when the transmission is 


completed. 
Response: Trouble reports 
1. SENT MESSAGE LOST 


means just that. It happens 
when attention is signalled 


before a message is 
delivered, or an equivalent 
transmission disturbance 
occurs. 


INCORRECT COMMAND 


CM2. Address text to desig- 
nated port and lock key- 
board: 

Enter )MSG 


followed by a port number 
and any one-line text. 


1. Same as CMl effect 1. 


2. Same as CMl1, Effect 2, 
except for a prefix R, to 
indicate that a reply is 
awaited, 


3. The keyboard will remain 
locked after the response is 
printed, 


Address text to system 
recording terminal: 
Enter )OPRN 
followed by 


text. 


any one-line 


1. 2. and 3. Same as CM1. 


Response: 
1. SENT 


See note at CMl. 


The keyboard can be 
unlocked, before receiving a 
reply, by means of an 
attention signal. 


oS See ee eee 


MESSAGE LOST 
See CMl. 


INCORRECT COMMAND 


See note at CMl. 


Trouble reports 
MESSAGE LOST 
See CMl. 


INCORRECT COMMAND 


CM4, Address text to system See note at CMl. 


keyboard: 

Enter )OPR 

followed by any one-line 
text. 


1. 2. and 3. Same as CM2. 


Response: Trouble reports 
1. SENT MESSAGE LOST 
See CMl. 


INCORRECT COMMAND 


PART 3 


THE LANGUAGE 


The API\ 360 Terminal System executes system commands or 
mathematical statements entered on a terminal typewriter. 
The system commands were treated in Part 2; the mathematical 
statements will be treated here. 


Acceptable statements may employ either primitive 
functions (e.g. + - * +) which are provided by the system, 
or defined functions, which the user provides by entering 


their definitions on the terminal. 


If system commands are not used, the worst that can 
possibly result from erroneous use of the keyboard is the 
printing of an error report. It is therefore advantageous 
to experiment freely and to use the system itself for 


settling any doubts about its behavior. For example, to 
find what happens in an attemped division by zero, simply 
enter the expression 4:0. If ever the system seems 


unusually slow to respond, execute an attention signal to 
interrupt execution and unlock the keyboard. 


The Sample Terminal Session of Appendix A shows actual 
intercourse with the system which may be used as a model in 
gaining facility with the terminal. The examples follow the 
text and may well be studied concurrently. More advanced 
programming examples appear in Appendix B. 


The primitive functions and the defined functions 
available in libraries can be used without knowledge of the 
means of defining functions. These means are treated in the 
four contiguous sections beginning with Defined Functions 
and ending with Homonyms. These sections may be skipped 
without loss of continuity. 


FUNDAMENTALS 


Statements. Statements are of two main types, the branch 
(denoted by * and treated in the section on Defined 
Functions), and the specification. A typical specification 


statement is of the form 
X*<3x4 


This statement assigns to the variable X the value resulting 
from the expression to the right of the specification arrow. 


Sad 


If the variable name and arrow are omitted, the resulting 
value is printed. For example: 


3x4 
12 


Results typed by the system begin at the left margin 
whereas entries from the keyboard are automatically 
indented. The keyboard arrangement is shown in Figure 1.2. 


Scalar and vector constants. All numbers entered via the 
keyboard or typed out by the system are in decimal, either 
in conventional form (including a decimal point if 
appropriate) or in exponential form. The exponential form 
consists of an integer or decimal fraction followed 
immediately by the symbol F followed immediately by an 
integer. The integer following the F specifies the power of 
ten by which the part preceding the F is to be multiplied. 
Thus 1,44#2 is equivalent to 144, 


Negative numbers are represented by a negative sign 
immediately preceding the number, e.g., 1.44 and “144F 2 
are equivalent negative numbers. The negative sign can be 
used only as part of a constant and is to be distinguished 
from the negation function which is denoted, as usual, by 


the minus sign -. 


A constant vector is entered by typing the constant 
components in order, separated by one or more spaces. A 
character constant is entered by typing the character 
between quotation marks, and a sequence of characters 
entered in quotes represents a vector whose successive 
components are the characters themselves. Such a vector is 
printed by the system as the sequence of characters, with no 
enclosing quotes and with no separation of the successive 
elements, The quote character itself must be typed in as a 
pair of quotes. Thus, the abbreviation of CANNOT is 
entered as 'CAW''T' and prints as CAN'T, 


Names and Spaces. As noted in Part 2, the name of a 
variable or defined function may be any sequence of letters 
or digits beginning with a letter and not containing a 
space. A letter may be any of the characters 4 to %, or any 
one of these characters underscored, e.g., Aor 8B. 


Spaces are not required between primitive functions and 
constants or variables, or between a succession of primitive 
functions, but they may be used if desired. Spaces are 
needed to separate names of adjacent defined functions, 
constants, and variables. For example, the expression 3+4 
may be entered with no spaces, but if F isa defined 


3.2 


function, then the expression 3 F 4 must be entered with the 
indicated spaces. The exact number of spaces used in 
succession is of no importance and extra spaces may be used 
freely. 


Overstriking and erasure. Backspacing serves only to 


position the carriage and does not cause erasure or deletion 


1. to insert missing characters (such as parentheses) 
if space has previously been left for them, 


2. to form compound characters by overstriking (e.g. 
6 and ! ), and 


ay to position the carriage for erasure, which is 
effected by striking the linefeed (marked ATTN on IBM 
2741 terminals). The linefeed has the effect of 


erasing the character at the position of the carriage, 
and all characters to the right. 


End of Statement. The end of a statement is indicated by 
striking the carriage return (followed, on some terminals, 
by an explicit transmission signal as described in Part 1}. 
The typed entry is then interpreted exactly as it appears on 
the page, regardless of the time sequence in which the 
characters were typed. 


Order of execution. In a compound expression such as 
3x44+652, the functions are executed (evaluated) from 
rightmost to leftmost, regardless of the particular 
functions appearing in the expression. (The foregoing 
expression evaluates to 24) When parentheses are used, as 
in the expression W+(3[@):XxY-2, the same rule applies, but, 
as usual, an enclosed expression must be completely 
evaluated before its results can be used. Thus, the 


foregoing expression is equivalent to We(3PQ)#(Xx(Y-Z)). 


In general, the rule can be expressed as follows: every 
function takes as its righthand argument the entire 
expression to its right, up to the right parenthesis of the 
pair that encloses it. 


Error reports. The attempt to execute an invalid statement 
will cause one of the error reports of Table 3.1 to be typed 
out. The error report will be followed by the offending 
statement with a caret typed under the point in the 
statement where the error was detected. If the caret lies 
to the right of a specification arrow, the specification has 
not yet been performed. 


Cause; CORRECTIVE ACTION 


Illegitimate overstrike. 


CHARACTER 


DEPTH Excessive depth of function execution.CLEAR STATR 


INDICATOR. 


DOMAIN Arguments not in the domain of the function. 


DEFN 


Misuse of V or 0 symbols; 

1. V is in some position other than the first. 
2. The function is pendent. DISPLAY STATE 
INDICATOR AND CLEAR AS REQUIRED. 

3. Use of other than the function name alone in 
reopening a definition. 

4, Improper request for a line edit or display. 


Index value out of range. 


Name of already defined function used as a label, 
or colon used other than in function definition 
and between label and statement. 


LENGTH 


Shapes not conformable. 


RANK 


Ranks not conformable. 


RESEND Transmission failure. RE-ENTER. IF CHRONIC, 


REDIAL OR HAVE TERMINAL OR PHONE REPAIRED. 


SYNTAX 


Invalid syntax; e.g., two variables juxtaposed; 
function used without appropriate arguments as 
dictated by its header; unmatched parentheses, 


SYMBOL 
TABLE 
FULL 


Too many names used. ERASE SOME FUNCTIONS 
OR VARIABLES, THEN SAVE, CLEAR, AND COPY. 


SYSTEM Fault in internal operation of APL\ 360. RELOAD 
OR SAVE, CLEAR, AND COPY. SEND TYPED RECORD, 
INCLUDING ALL WORK LEADING TO THE ERROR, TO THE 


SYSTEM MANAGER. 


‘Use of name which has not been asSigned a value. 
ASSIGN A VALUE TO THE VARIABLE, OR DEFINE THE 
FUNCTION. 


WS FULL Workspace is filled (perhaps by temporary values 
produced in evaluating a compound expression). 
CLEAR STATE INDICATOR, ERASE NEEDLESS OBJECTS, OR 


REVISE CALCULATIONS TO USE LESS SPACE. 


Table 3.1 ERRCR REPORTS 


3.4 


If an invalid statement is encountered during execution 
of a defined function, the error report includes the 
function name and the line number of the invalid statement. 
The recommended procedure at this point is to enter a right 
arrow (+) alone, and then retry with an amended statement. 
The matter is treated more fully in the section on Suspended 
Function Execution. 


Names of primitive functions. The primitive functions of 
the language are summarized in Tables 3.2 and 3.8, and will 
be discussed individually in subsequent sections. The tables 
show one suggested name for each function. This is not 
intended to discourage the common mathematical practice of 
vocalizing a function in a variety of ways (for example, 
X+Y may be expressed as "X divided by Y", or "X over Y"). 
Thus, the expression pM yields the dimension of the array M, 


The importance of such names and synonyms diminishes 
with familiarity. The usual tendency is toward the use of 
the name of the symbol itself (e.g., "xho" (pe) for "size", 
and "iota" (1) for “index generator"), probably to avoid 
unwanted connotations of any of the chosen names. 


SCALAR FUNCTIONS 


Each of the primitive functions is classified as either 
scalar or mixed. Scalar functions are defined on scalar 
(i.e., individual) arguments and are extended to arrays in 
four ways: element-by-element, reduction, inner product, and 
outer product, as described in the section on Functions on 


Arrays. Mixed functions are discussed in a later section. 


The scalar functions are summarized in Table 3.2. Each 
is defined on real numbers or, as in the case of the logical 
functions and and er, on.some subset of them. No functional 
distinction is made between "fixed point” and "floating 
point" numbers, this being primarily a matter of the 
representation in a particular medium, and the user of the 
terminal system need have no concern with such questions 
unless his work strains the capacity of the machine with 


respect to either space or accuracy. 


Three different representations for numbers are used 
internally, and transformations among them are carried out 
automatically. Integers less than 2 to the power 52 are 
carried with full precision; larger numbers and non-integers 
are carried to a precision of about 16 decimal digits. 


3g 50° 


Dyadic form AfB 


Name 


“Monadic form £B 
+ | Plus 


Definition 
or example 


Definition 
or example 


Plus 


0-B Negative Minus 


Times 


(B>0)-(B<0) Signum 


14B Reciprocal Divide 


Ceiling Maximum 


Floor Minimum 


«B «> (2.71828..)*B| Exponential Power 


Logarithm AeB <+ Log B base A 


A@B +> (@B)+@A 


Natural 
logarithm 


@xV <> N <> *@WN 


|~3.14 +> 3,14 Magnitude Residue A\B 


AIB +> (!B)+(3A)xtB-A 
215 <+ 10 315 «+ 10 


Binomial 
coef ficient 


4 Factorial 
1B <> Bx!B-1 


or !B «+ Gamma(B+1) 


A Mixed Function (See 
Table 3.8) 


?B «+ Random choice] Roll Deal 


from iB 


Circular See Table at left 


Bx3.14159... |Pi times 


0 


And 
Or 
Nand 


(1-Bx2)*.5 


Arcsin B Sine B Nor 
Arccos B Cosine B 
Arctan B Tangent B 
("14+Bx2)*.5 (1+B*2)*.5 Less Relations 
Arcsinh B Sinh B Not greater Result is 1 if the 
Arccosh B Cosh B Equal relation holds, 0 


if it does not: 
3<7 <7 1 
7453 <7 0 


Not less 
Greater 
Not Equal 


Arctanh B Tanh B 


KRviVi Aa 


Table of Dyadic o Functions 


Table 3.2: PRIMITIVE SCALAR FUNCTIONS 


Sef 


For operations such as floor and ceiling, and in 
comparisons, a "fuzz" of about 1£ 13 is applied in order to 
avoid anomalous results that might otherwise be engendered 
by doing decimal arithmetic on a binary machine. 


Two of the functions of Table 3.2, the relations * and 
=, are defined on characters as well as on numbers. 


Monadic and dyadic functions. Each of the functions defined 
in Table 3.2 may be used in the same manner as the familiar 
arithmetic functions + - x and 3:, Most of the symbols 
employed may denote either a monadic function (which takes 
one argument) or a Gdyadic function (which takes two 
arguments). For example, [Y denotes the monadic function 
ceiling applied to the single argument Y, and XIY denotes 
the dyadic function maximum applied to the two arguments X 
and Y. Any such symbol always denotes a dyadic function if 
possible, i.e., it will take a left argument if one is 


present. 


At this point it may be helpful to scrutinize each of 
the functions of Table 3.2 and to work out some examples of 
each, either by hand or on a terminal. However, it is not 
essential to grasp all of the more advanced mathematical 
functions (such as the hyperbolic functions sinh, cosh, and 
tanh, or the extension of the factorial to non-integer 
arguments) in order to proceed. Treatments of these 
functions are readily available in standard texts. 


Certain of the scalar functions deserve brief comment. 
The residue function A|B has the usual definition of residue 
used in number theory. For positive integer arguments this 
is equivalent to the remainder obtained on dividing B by A, 
and may be stated more generally as the smallest 
non-negative member of the set B-NxA, where W is any 
integer. 


This formulation covers the case of a zero left 
argument as shown in Table 3.2. The conventional definition 
is extended in two further respects: 


1. The left argument 4 need not be positive; however, 
the value of the result depends only on the magnitude 
Of A. 


2. The arguments need not be integral. For example, 
1|2.6 is 0.6 and 1.518 is 0.5. 


The expression ~8*.5 (square root of 8) yields a 
domain error, but ~8*1:3 has the value -2. More generally, 
A*xB is valid for A<O if the right argument is (a close 
approximation to) a rational number with an odd denominator 
not greater than 85, 


3.8 


The factorial function !W is defined in the usual way 
as the product of the first N positive integers. It is also 
extended to non-integer values of the argument W and is 
equivalent to the Gamma function of W+1. 


The function A!B (pronounced A out of B) is defined as 
(!B)+(tA)x!B-A. For integer values of A and B, this is the 
number of combinations of B things taken A at a time. (It 
is related to the Complete Beta function as follows: 
Beta(P,Q) <> £Qx(P-1)!1P+Q-1.) 


The symbols << = 2 > and # denote the relations 
less than, less than or egual, etc., in the usual manner. 
However, an expression of the form 4A<B is treated not as an 
assertion, but as a function which yields al if the 


proposition is true, and 0 if it is false. For example: 


When applied to logical arguments (i.e., arguments 


equivalent to six of the logical functions of two arguments. 
For example, < is equivalent to material implication, and # 


Vectors. Each of the monadic functions of Table 3.2 applies 
to a vector, element by element. Each of the dyadic 
functions applies element by element to a pair of vectors of 
equal dimension or to one scalar and avector of any 
dimension, the scalar being used with each component of the 


vector. For example: 


123 4x4 321 
4 6 6 4 


2+1 2 3 4 
3 4 5 6 
12 3 4f2 
2 2 3 4 
Index generator. If NW is a non-negative integer, then 1 


denotes a vector of the first W integers. The dimension of 
the vector 1N is therefore WN; in particular, 11 is a vector 
of length one which has the value 1, and 10 is a vector of 


dimension zero, also called an empty vector. The empty 
vector prints as a blank. For example: 


14 
1 2 3 4 
15 


10 
Empty vector prints as a blank 


2x10 Scalar applies to all (i.e., 0) elements 
of 10, resulting in an empty vector 


2 4 6 8 10 12 
The index generator is one of the class of mixed 

functions to be treated in detail later; it is included here 

because it is useful in examples. 

DEFINED FUNCTIONS 

Introduction. It would be impracticable and confusing to 


attempt to include as primitives ina language all of the 
functions which might prove useful in diverse areas of 


application. On the other hand, in any particular 
application there are Many functions of general utility 
whose use should be made as convenient as possible. This 


need is met by the ability to define and name new functions, 
which can then be used with the convénience of primitives. 


This section introduces the basic notions of function 
definition and illustrates the use of defined functions. 
Most of the detailed mechanics of function definition, 
revision, and display, are deferred to the succeeding 
section. 


The sequence 


VSPHERE 
C1] SURF+<4x3.14159xRxP 
[2] VOL+SURFXR+3 
[3] v 


is called a function definition; the first V (pronounced 
del) marks the beginning of the definition and the second V 
marks the conclusion: the name following the first V (in 
this case SPHERE) is the name of the function defined, the 
Numbers in brackets are statement numbers, and the 


accompanying statements form the body of the function 
definition. : 


The act of defining a function neither executes nor 
checks for validity the statements in the body; what it does 


is make the function name thereafter equivalent to the body. 
For example: 


VSPHERE Definition of the 
(1] SURF<4x3.14159xRxR function SPHERE 
| VOL+SURFXR+3 


£3]: Vea i es eiontee 
R+2 Specification and display 
Ro. of the argument FR 
2 
SURF SURF has not been 
VALUE ERROR assigned a value 
5 SURF 
A 
SPHERE Execution of SPHERE 
SURF — SURF and VOL now have 
50. 26544 values assigned by the 
VOL - execution of-SPHERE 
33.51029338 
Re1 Use of SPHERE for 
SPHERE a new value of the 
SURF argument R 
12.56636 
VOL 


4188786667 


Branching. Statements in a function are normally executed 
in the order indicated by the statement numbers, and 


sequence. This normal order can be modified by branches. 


Branches make possible the construction of iterative 
procedures. 


The expression +4 denotes a branch to statement 4 and 
causes statement 4 of the function to be executed next. In 
general, the arrow may be followed by any expression which, 
to be effective, must evaluate to an integer. This value is 
the number of the statement to be executed next. If the 
integer lies outside the range of statement numbers of the 
body of the function, the branch ends the execution of the 


function. 


If the value of the expression to the right of a branch 
arrow is a non-empty vector, the branch is determined by its 
first component. If the vector is empty (i.e., of zero 
dimension) the branch is vacuous and the normal sequence is 
followed. 


The 


following examples illustrate various methods of 


branching used in three equivalent functions (SUM, SUM1, anda 
SUM2) for determining § as the sum of the first W integers: 


Dad 
[2] 
C3] 
C4] 
[5] 
[6] 
C7] 


i 


[3] 
C4] 


E74 


15 


Ct 
[2] 
£3] 
C4] 
C5] 
C6] 


VSUM 
S<0 
I<1 
>4xI<N 
S<S+T 
I<f+1 
+3 

V 

NV+1 
SUM 

Ss 


N<2 
SUM 
S 


N+5 
SUM 
S 


VSUM1 
S+0 
I+1 
>Ox1f >N 
S<S+T 
I<f+1 
+3 

V 

N<5 
SUM1 
S 


VSUM2 
S<«0 

I<0 
S<S+T 
I<I+1 
>+3x1I<N 
Vv 


From the 
it should be clear 


Branch to 4x1 (i.e., 4) or to 4x0 (out) 


Unconditional branch to 3 


Equivalent to SUM 


Branch to 0(out) or continue to next 
line since 0x10 is an empty vector 


Unconditional branch to 3 


Equivalent to SUM 


Branch to 3 or fall through(and out) 


last two functions in the foregoing example, 


that the expression x1 occurring ina 


branch may often be read as "if", For example, +3xiI<W may 


be read as 


"Branch to 3 if © is less than or equal to WW." 


Local and global variables. A variable is normally global 
in the sense that its name has the same significance no 
matter what function or functions it may be used in. 
However, the iteration counter I occurring in the foregoing 
function SUM is of interest only during execution of the 
function; it is frequently convenient to make such a 
variable local to a function in the sense that it has 
meaning only during the execution of the function and bears 
no relation to any object referred to by the same name at 
other times. Any number of variables can be made local to a 
function by appending each (preceded by a semicolon) to the 
function header. Compare the following behavior of the 
function SUM3, which has a local variable l, with the 
behavior of the function SUM2 in which I is global: 


VSUM3 sf VSUM2 
[1] S+0 £414 S<0 
[2] I<+0 [2] I<+0 
C3] S<S4+l [3] S<S+IT 
C4] T*It+t C4] T+I+1 
[5] >+3xiI<N [5] >+3xi1I<N 
C6] Vv [6] v 
I<20 1[<20 
N<5 N<5 
SUM3 SUM2 
Ss gS 
15 15 
rT L 
20 6 


Since I is local to the function SUM3, execution of SUM3 has 
no effect on the variable I referred to before and after the 
use of SUM3. 


However, if the variable XK is local to a function F 
then any function G used within F may refer to the same 
variable X, unless the name X is further localized by being 
made local to G. For further treatment of this matter, see 
the section on Homonyns, 


Explicit argument. A function definition of the form 


VSPH X 
| SUR*4xX3,14159xXxX 
[2] Vv 


defines SPH as a function with an explicit argument; 
whenever such a function is used it must be provided with an 
argument. For example: 


SPH 2 
SUR 
50, 26544 
SPH 1 
SUR 
12.56636 


Any explicit argument of a function is automatically 
made local to the function; if F is any expression, then the 
effect of SPH EF is to assign to the local variable YX the 
value of the expression fF and then execute the body of the 
function SPH. Except for having a value assigned initially, 
the argument variable is treated as any other local variable 
and, in particular, may be respecified within the function. 


Explicit result. Each of the primitive functions produces a 
result and may therefore appear within compound expressions. 
For example, the expression :7 produces an explicit result 
and may therefore appear in a compound expression such as 


X++Z,. A Lunction definition of the form 


VZ<+SP X 
C1] Z4x3,.44159xXxY 
[2] Vv 


defines SP as a function with an explicit result; the 
variable Z is local, and the value it assumes at the 
completion of execution of the body of the function is the 
explicit result of the function. For example: 


Q<3xSP 1 

Q 
37,69908 

R«2 

(SP R)xR+3 
33.51029333 


= OS SSS Sas S22 OS SS SS ee 


with 2,1, or 0 explicit arguments and either with or without 
an explicit result. The form of header used to define each 
of these six types is shown in Table 3.3. Each of the six 
forms permits the appending of semicolons and names to 
introduce local variables. The names appearing in any one 
header must all be distinct; e.g., the header 2<F 2 is 
invalid. 


Number of |Number of Results 
Arguments 0 1 

0 VE 

1 VF Y 

2 VX F Y 


Table 3.3: FORMS OF DEFINED 
FUNCTIONS 


It is not obligatory either for the arguments of a 
defined function to be used within the body, or for the 
result variable to be specified. A function definition 
which does not assign a value to the result variable will 
engender a value error report when it is used within a 
compound expression. This behavior permits a function to be 
defined with a restricted domain, by testing the argument (s) 
and branching out in certain cases without specifying a 
result. For example: 


VZ+SQRT X 
C1] +0x1X<0 
[2] Z<Xx,5V 


Q<SQRT 16 
@ 
Fs 
Q<+SQRT “16 
VALUE ERROR 
Q+SQRT ~16 


A 


Use of defined functions. A defined function may be used in 
the same ways that a primitive function may. In particular, 
it may be used within the definition of another function, 
For example, the function HYP determines the hypotenuse of a 
right triangle of sides A and B by using the square root 


function SQRT: 


VZ<SQRT X 
C1] Z+X*,5V 


VH<A HYP B 
[1] H<SQRT (Ax*x2)+Bx2V 


5 HYP 12 
13 


A defined function must be used with the same number of 
arguments as appear in its header, 


Recursive function definition. A function F may be used in 
the body of its own definition, in which case the function 
is said to be recursively defined. The following program 
FAC shows a recursive definition of the factorial function. 
The heart of the definition is statement 2, which determines 
factorial W as the product of W and FAC N-1, except for the 


case W=0 when it is determined (by statement 4) as 1: 


VZ<+FAC WN 
[1] >hx1N=0 
[2] Z*NxXFAC N-1 


[3] +0 
Cu] Z2<1V 
Trace control. A trace is an automatic type-out of 


information generated by the execution of a function as it 
progresses. In a complete trace of a function P, the number 
of each statement executed is typed out in brackets, 
preceded by the function name P and followed by the final 
value produced by the statement. ‘The trace is useful in 
analyzing the behavior of a defined function, particularly 
during its design. 

The tracing of P is controlled by the trace vector for 
P, denoted by TAP. If one types fTAP<2 3 5 then statements 
2,3,and 5 will be traced in any subsequent execution of P, 
More generally, the value assigned to the trace vector may 
be any vector of integers. Typing TAP+0 will discontinue 
tracing of P. A complete trace of P is set up by entering 
TAP«iN, where WN is the number of statements in P, 


MECHANICS OF FUNCTION DEFINITION 


When a function definition is opened (by typing aV 
followed by a header), the system automatically types 
successive statement numbers enclosed in brackets and 
accepts successive entries as the statements forming the 
body of the definition. The system is therefore said to be 
in definition mode, as opposed to the. execution mode which 
prevails outside of function definition. 


There are several devices which may be used during 
function definition to revise and display the function being 
defined. After function definition has been closed, there 
are convenient ways to re-open the definition so that these 
same devices may be used for further revision or display. 


Labels. If a statement occurring in the body of a function 
definition is prefaced by a name anda colon, then at the 
end of the definition the name is assigned a value equal to 
the statement number. A variable specified in this way is 
called a label. Labels are used to advantage in branches 
when it is expected that a function definition may be 
changed for one reason or another, since a label 
automatically assumes the new value of the statement number 
of its associated statement as statements are inserted or 


deleted. 


Revision. Any statement number (including one typed by the 
system) can be overridden by typing [N], where N is any 
positive number less than 10000, with or without a decimal 
point and with at most four digits to the right of the 
decimal point. If N is zero, it refers to the header line 
of the function. 


If any statement number is repeated, the statement 
following it supersedes the earlier specification of the 
statement. If any statement is empty -- that is, the 
bracketed statement number was immediately followed by both 
a linefeed and a carriage return (a carriage return alone is 
vacuous) -- it is deleted. 


When the function definition mode is ended, the 
statements are reordered according to their statement 
numbers and the statement numbers are replaced by the 
integers 1,2,3, and so on. Labels are assigned appropriate 
values. 


The particular statement on which the closing V appears 
is not significant, since it marks only the end of the 
definition mode, not necessarily the last line of the 
function. Moreover, the closing V may be entered either 
alone or at the end of a statement. 


Display. During function definition, statement N can be 
displayed by overriding the line number with [ND]. After 
the display, the system awaits replacement of statement N. 
Typing [0] displays the entire function, including the 
header and the opening and closing V, and awaits entry of 
the next statement; typing [UN] displays all statements from 
N onward and awaits replacement of the last statement. 
Executing an attention signal will stop any display. 


Line editing. During function definition, statement N can 


be modified by the following mechanism: 
1. Type [NOM] where M is an integer. 


2. Statement N is automatically displayed and the 
Carriage stops under position M. 


3. A letter or decimal digit or the symbol / may be 
typed under any of the positions in the displayed 
statement. Any other characters typed in this mode 
are ignored. The ordinary rules for backspace and 
linefeed apply. 


4, When the carriage is returned, statement N is 
re-displayed. Each character understruck by a / is 
deleted, each character understruck by a digit K is 
preceded by K added spaces, and each character 
understruck by a letter is preceded by 5xR spaces, 
where R is the rank of the letter in the alphabet. 
Finally, the carriage moves to the first injected 
space and awaits the typing of modifications to the 
statement in the usual manner. The final effect is to 
define the statement exactly as if the entry had been 
made entirely from the keyboard; in particular, a 
completely blank sequence leaves the statement 
unchanged. 


If the statement number itself is changed during the 
editing procedure, the statement affected is determined by 
the new statement number; hence statement N remains 
unchanged. This permits statements to be moved, with or 
without modification. 


Reopening function definition. If a function fF is already 
defined, the definition mode for that function can be 
re-established by entering VR alone; the rest of the 
function header must not be entered. The system responds by 
typing [W+1], where W is the number of statements ink. 


Function definition then proceeds in the normal manner. 


Function definition may also be established with 
editing or display requested on the same line. For example, 
VER[31xX<X+i initiates editing by entering a new line 3 
immediately. The system responds by typing [4] and awaiting 
continuation. The entire process may be accomplished on a 
single line. Thus, VR[31X«X+1V opens the definition of Ff, 
enters a new line 3, and terminates the definition mode. 
Also, VR[IODJV causes the entire definition of F# to be 
displayed, after which the system returns to execution mode. 


Similar expressions involving display are also 
permissible, for example, VR[OM31V or VALCO] or VRE 2010]. 


Locked functions. If the symbol ¥ (formed by a V overstruck 
with a ~ and called del-tilde) is used instead of V to open 
or close a function definition, the function becomes locked. 
A locked function cannot be revised or displayed in any way. 
Moreover, an error stop within the function will print only 
the function name and statement number, not the statement. 
Finally, the associated stop control (see next section) and 
trace control vectors cannot be changed after the function 
is locked. 


Locked functions are used to keep a function definition 
proprietary. For example, in an exercise in which a student 
is required to determine the behavior of a function by using 
it for a variety of arguments, locking a function prevents 
him from displaying its definition. 


Deletion of functions and variables. A function F (whether 
2.1). It may also be deleted by deleting every one of its 
statements. A variable may be deleted only by the erase 
command. 


System command entered during function definition. A system 
command entered during function definition will not be 
accepted as a statement in the definition. Some commands, 
such as )COPY, will be rejected with the message 
NOT WITH OPEN DEFINITION (see Table 2.1); most will be 
executed immediately. 


SUSPENDED FUNCTION EXECUTION 


Suspension. The execution of a function F may be stopped 
before completion in a variety of ways: by an error report, 
by an attention signal, or by the stop control vector SAF 
treated below. In any case, the function is still active 
and its execution can later be resumed. In this state the 
function is said to be suspended. Typing >K will cause 
execution of the suspended function to be resumed, beginning 
with statement K. 


Whatever the reason for suspension, the statement or 
statement number displayed is the next one to have been 
executed. A branch to that statement number will cause 
normal continuation of the function execution, and a branch 
out (+0) will terminate execution of the function. 


The function 126 (described in the section on System 
Dependent Functions) yields the number of the statement next 
to be executed. Hence the expression +126 provides a safe 
and convenient way to cause normal resumption of execution. 


In the suspended state all normal activities are 
possible. In particular, the system is in a condition to: 


1. execute statements or system commands. 


2. resume execution of the function at an arbitrary 
point W (by entering >¥). 


3. reopen the definition of any function which is not 
pendent. The term pendent is defined in the 


discussion of the state indicator below. 


If function execution is interrupted by a disconnect, 
the function is suspended and the resulting active workspace 
is automatically saved under the name CONTINUE, as noted in 
Part 2. 


State indicator. Typing )SI causes a display of the state 


indicator; a typical display has the following form: 


ST 
AC71] «x 
G[2] 
F(3] 


The foregoing display indicates that execution was 
halted just before executing statement 7 of the function 4, 
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that the current use of function 4 was invoked in statement 
2 of function G, and that the use of function G was in turn 
invoked in statement 3 of F. The * appearing to the right 
of #HL[7] indicates that the function #7 is suspended; the 
functions G and F are said to be pendent. 


Further functions can be invoked when in the suspended 
state. Thus if G were now invoked and a further suspension 
occurred in statement 5 of Q, itself invoked in statement 8 
of G, a subsequent display of the state indicator would 
appear as follows: 


SI 
@[5] * 
G[8] 
HL7] * 
G{L2] 
F(3] 


The entire sequence from the last to the preceding 
suspension can be cleared by typing a branch with no 
argument (that is, +). This behavior is illustrated by 
continuing the foregoing example as follows: 


> 


ST 
HL7] * 
GL2] 
FE3] 


Repeated use of > will clear the state indicator completely. 
The cleared state indicator displays as a blank line. 


the statements controlled), and stops execution just before 
each of the specified statements. At each stop, the 
function name and the line number of the statement next to 
be executed are printed. After the stop the system is in 
the normal suspended state; resumption of execution may 


therefore be initiated by a branch. 


Trace control and stop control can be used in 
conjunction. Moreover, either of the control vectors may 
be set within functions. In particular, they may be set by 
expressions which initiate tracing or halts only for certain 
values of certain variables. 


HOMONYMS 


Variable names. The use of local variables introduces the 
possibility of having more than one object in a workspace 
with the same name. Confusion is avoided by the following 
rule: when a function is executed, its local variables 
Supersede, for the duration of the execution, other objects 
of the same name. A name may, therefore, be said to have 


one active referent and (possibly) several latent referents. 


The complete set of referents of a name can be 
determined with the aid of the SIV list (state indicator 
with local variables), whose display is initiated by the 
command )SIV. The SIV list contains the information 
provided by the command )SI, augmented by the names of the 
variables local to each function. A sample display follows: 


)SIV 
G{7] * ZX T 
FCY] PJ 
Q@C3] * CX PT 
RC2] P 
GL3] ZX TL 


If the SIV list is scanned downward, from the top, the 
first occurrence of a variable is the point at which its 
active referent was introduced; lower occurrences are the 
points at which currently latent referents were introduced; 
and if the name is not found at all, its referent is global, 
and should be sought for with the commands )FNS, )VARS, or 
)GRPS. 


As the state indicator is cleared (by +, or by the 
continuation to completion of halted functions), latent 
referents become active in the sequence summarized, for the 
preceding SIV list, by the following diagram: 


Z J 


ce <— 4 — teh 
<- 4 eh 
~~ 4 —+e— ty 


+ | 
| + 
| | 
| | 
¥ | 
¥ ¥ 
The currently active referent of a name holds down to 


and including the execution of the function listed at the 
point of the first arrow, because of localization of the 


name within that function. The first latent referent 
becomes active when that function is completed, and holds 
down to the next arrow; and so forth until the state 
indicator is completely cleared, at which point there are no 
longer any latent referents, and all active referents are 
global objects. 


Function names. All function names are global. In the 
foregoing example, therefore, a function named P cannot be 
used within the function R or within any of the functions 


employed by Rk, since the local variable name P makes the 


function P inaccessible. However, even in such 
circumstances, the opening of function definition for such a 
function P is possible. (Moreover, as stated in Part 2, 


system commands concern global objects only, regardless of 
the current environment. ) 


This scheme of homonyms is easy to use and relatively 
free from pitfalls. It can, however, lead to seeming 
anomalies as indicated by the following example (shown to 
the authors by J.C.Shaw) of two pairs of functions which 
differ only in the name used for the argument: 


VZ<F X VZ«F X 
| Z<X+YV [1] Z<eX+YV 
VZ<G Y V2+G R 
C1] Z+F YV C1] Z<+F RV 
Y<3 Y¥<3 
G 4 G 4 
8 7 


INPUT AND OUTPUT 


The following function determines the value of an 
amount A invested at interest B[1] for a period of 8[2] 
years: 


VZ<A CPI B 
[1] Z<Ax(1+.01xBL1])*BL21V 


For example: 


1000 CPI 5 4 
1215.50625 


The casual user of such a function might, however, find 
it onerous to remember the positions of the various 
arguments and whether the interest rate is to be entered as 
the actual rate (e.g., .05) or in percent (e.g., 5). An 
exchange of the following form might be more palatable: 


CI 
ENTER CAPITAL AMOUNT IN DOLLARS 
O: 
1000 
ENTER INTEREST IN PERCENT 
O: 
5 
ENTER PERIOD IN YEARS 
O: 
4 


RESULT IS 1215.50625 


It is necessary that each of the keyboard entries 
(1000, 5, and 4) occurring in such an exchange be accepted 
not as an ordinary entry (which would only evoke the 
response 1000, etc.), but as data to be used within the 
function CI. Facilities for this are provided in two ways, 


The definition of the function CI is shown at the end 
of this section. 


Evaluated input. The quad symbol 0) appearing anywhere other 
than immediately to the left of a specification arrow 
accepts keyboard input as follows: the two symbols 0: are 
printed, the paper is spaced up one line, and the keyboard 
unlocks. Any valid expression entered at this point is 
evaluated and the result is substituted for the quad. For 
example: 


VZ<F 
| Z<4x x2 
[2] Vv 

F 
O: 

3 
36 

F 
O: 

342 


An invalid entry in response to request for a quad 
input induces an appropriate error report, after which input 
is again awaited at the same point. A system command 
entered will be executed, after which (except in the case of 
one which replaces the active workspace) a valid expression 
will again be awaited. An empty input (i.e., a carriage 
return alone or spaces and a carriage return) is rejected 
and the system again prints the symbols JU: and awaits input. 


The symbols [: are printed to alert the user to the 
type of input expected; they can be changed by the library 
function SFEI as described in Part 4. 


Character input, The quote-quad symbol 0 (i.e., a quad 
overstruck with a quote) accepts character input: the 
keyboard unlocks at the left margin and data entered are 


accepted as characters. For example: 


Xx 

CAN'T (Quote-quad input, not indented) 
Xx 

CAN'T 


Escape from input Loop. If evaluated or character input 
occurs within an endless loop in a function, it may be 
impossible to escape by the usual device of striking the 
attention button. Escape from 0 input can be achieved by 
entering >. Escape from [ input can be achieved by typing 
the three letters OUZ, in that order, but witha backspace 
between each pair so that they all overstrike. The effect 
is exactly as if the symbol + were entered while suspended. 


Normal output. The quad symbol appearing immediately to the 
left of a specification arrow indicates that the value of 
the expression to the right of the arrow is to be printed. 
Hence, [+X is equivalent to the statement xX, The longer 
form 0<+X is useful when employing multiple specification. 
For example, 0«@+X*2 assigns to @ the value X*2 and then 


prints the value of X*2. 


The page width (measured in characters) may be set to 
any value W in the range 30-130 by entering the command 
)WIDTH Nw It may also be set by the library function WIDTH 
which may be used within a defined function. (See Part 4.) 


Heterogeneous output. A sequence of expressions separated 
by semi-colons will cause the values of the expressions to 
be printed, with no intervening carriage returns or spaces 


except those implicit in the display of the values. 


The primary use of this form is. for output in which 
some of the expressions yield numbers an@ some yield 
characters. For example, if X¥«2 14 , then: 


'THE VALUE OF X IS '3X 
PHE VALUE OF X ITS 2 14 


A further example of mixed output is furnished by the 
definition of the function CI which introduced the present 
sections 


VCI3A3I3Y 
[1] "ENTER CAPITAL AMOUNT IN DOLLARS' 
[2] AO 
C3] "ENTER INTEREST IN PERCENT! 
Cul T+ 
[5] "ENTER PERIOD IN YEARS' 
[6] ¥<Q 
C7] "RESULT IS '3Ax(1+.01xI)«*YV 


RECTANGULAR ARRAYS 


Introduction. A single element of a rectangular array can 
be selected by specifying its indices; the number of indices 
required is called the dimensionality or rank of the array. 
Thus a vector is of rank l, a matrix (in which the first 
index selects a row and the second a column) is of rank 2, 
and a scalar (since it permits no selection by indices) is 
an array of rank 0. Rectangular arrays of higher rank may 
be used, and are called 3-dimensional, 4-dimensional, etc. 


This section treats the reshaping and indexing of 
arrays, and the form of array output.. The following section 
treats the four ways in which the basic scalar functions are 
extended to arrays, and the next section thereafter treats 
the definition of certain mixed functions on arrays. 


Vectors, dimension, catenation. If X is a vector, then px 
denotes its dimension. For example, if X¥+2 35 7 11, then 
oX is 5, and if Y+'APCc' , then pY is 3. A single character 
entered in quotes or in response to aM input is a scalar, 
not a vector of dimension 1; this parallels the case of a 


single number, which is also a scalar. 


Catenation chains two vectors (or scalars) together to 


form a vector; it is denoted by a comma. For example: 


xX<2 35 7 11 
XX 
GO «Bo SG F Cad Aes SB 2S 2 SEd 


In general, the dimension of X,Y is equal to the total 
number of elements in X and Y. A numeric vector cannot be 
catenated with a character vector. (However, see 
Heterogeneous Output.) 


Matrices, dimension, ravel. The monadic function p applied 
to an array A yields the size of A, that is, a vector whose 
components are the dimensions of A. For example, if A is 


the matrix 


of three rows and four columns, then pA is the vector 3 4. 


Since pA contains one component for each coordinate of 


A, the expression ppA is the rank of A. Table 3.4 
illustrates the values of pA and ppA for arrays of rank 0 
(scalars) up to rank 3. In particular, the function p 


applied to a scalar yields an empty vector. 


Type of array| pA | 


Scalar 
Vector 
Matrix 
3-Dimensional 


Table 3.4: DIMENSION AND 
RANK VECTORS 


The monadic function ravel is denoted by a comma; when 
applied to any array A it produces a vector whose elements 
are the elements of A in row order. For example, if A is 


the matrix 


oe: <b> 4 
10 12 44 16 
Le. 20" 22 Du 


and if V+,A then VY is a vector of dimension 12 whose 
elements are the integers 2 4 6 8 10 12... 24, If A 
is a vector, then ,A is equivalent to A; if Aisa scalar, 
then ,A is a vector of dimension 1. 


Reshape. The dyadic function oo reshapes its right argument 
to the dimension specified by its left argument. If M<DpV, 
then M is an array of dimension D whose elements are the 


elements of V. For example, 2 391 2 3 4 5 6 is the matrix 


de 2-38 
4 5 6 


If Ww, the total number of elements required in the 
array DepV, is equal to the dimension of the vector V, then 
the ravel of DopV is equal to/V. IfW is less thanpV, then 
only the first NW elements of V are used; if WV is greater 
than pV, then the elements of / are repeated cyclically. 
For example, 2 391 2 is the matrix 


1 2 4 
2 41 2 


and 3 391 000 is the identity matrix 


1 0 0 
oO 1 0 
0 oO 1 


More generally, if A is any array, then DpA is 


equivalent toDp.,A. For example, if A is the matrix 
1 2 3 
4 5 6 


then 3 59A is the matrix 


4 42 3 4 = 5 
6 4 2 3 4 
5 6 1 2 3 


The expressions 0pX¥ and0O 3pX and3 O0pX and 0° OpxX are 
all valid; any one or more of the dimensions of an array may 
be zero. 


Uses of empty arrays. A vector of dimension zero contains 
no components and is called an empty vector. Three 
expressions which yield empty vectors are10 and ony and p 
applied to any scalar. An empty vector prints as a blank 
line. 


One important use of the empty vector has already been 
illustrated: when one occurs as the argument of a branch, 
the effect is to continue the normal sequence. 


The following function for determining the 
representation of any positive integer W in a base B number 
system shows a typical use of the empty vector in 
initializing a vector Z which is to be built up by 
successive catenations: 


VZ*+B BASE WN 
ese Z<10 
[2] Z+(B|N),2Z 
[3] N<LN2B 
C4] +2xW>0V 

10 BASE 1776 
1 7 7 6 

8 BASE 1776 
3.3 6 O 


Empty arrays of higher rank can be useful in analogous 
ways in conjunction with the expansion function described in 


the section on Mixed Functions. 


indexing. If X¥ is a vector and ZI is a scalar, then X[I]J 


denotes the [th element of X. For example, if ¥«2 35 7 11 
then X[2] is 3. 


If the index I is a vector, then X[I] is the vector 
obtained by selecting from X the elements indicated by 
successive components of I. For example, XL[1 3 5] is 
25 11 and X£5 4321] is 117 5 3 2 and X[13] is 2 3 5, 
If the elements of I do not belong to the set of indices of 
X, then the expression X[I] induces an index error report. 


In general, pX[I] is equal to pZ. In particular, if I 
is a scalar, then X[7T] is a scalar, and if J is a matrix, 
then X[T] is a matrix. For example: 


A+'ABCDEFG' 
M4 3932424441424 14 4 
. 

3 14 4 

2 14 4 

4 1 2 

he 4 4 
ACM] 

CAD 

BAD 

DAB 

DAD 


If M is a matrix, then MW is indexed by a two-part list 
of the form I;J where J selects the row (or rows) and J 
selects the column (or columns). For example, if M is the 
matrix 
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In general, oM[I;/] is equal to (pIT),0¢7. Hence if I 
and J are both vectors, then M[I;J] is a matrix; if both L 
and J are scalars, M[I;J] is a scalar; if J is a vector and 


J is ascalar (or vice versa), M[I:J] is a vector. The 
indices are not limited to vectors, but may be of higher 
rank. For example, if J is a 3 by 4 matrix, and 7 isa 


vector of dimension 6, then M[I:J] is of dimension 3 4 6, 
and M[J;7j] is of dimension 6 3 4 In particular, if Tf and P 
and @ are matrices, and if R<T[P;Q], then R is an array of 
rank 4 and R[I;7;X;L] is equal to PLPLEsd J3QCRsLJd. 


The form M[I;] indicates that all columns are selected, 
and the form M[;:J] indicates that all rows are selected. 
For example, M[2;] is 5 6 7 8 and M[:;2 1J is 


2 4 
6 s) 
10 9 


The following example illustrates the use of a matrix 
indexing a matrix to obtain a three-dimensional array: 


Me4 3931421244142 4 14 


M 
3 1 y 
Oo. an Sh 
4 q 2 
y 1 y 

MUM; ] 
yy 1 2 
3 1 yy 
4 1 4 
2 1 4 
3 at 4 
4 1 uy 
i> “Aw 8 
3 4 4 
2 1 u 
4 1 uy 
3 1 u 
y 1 4 
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Permutations are an interesting use of indexing. A 
vector Pwhose elements are some permutation of its own 
indices is called a permutation of order oP. For example, 


Indexing on the left. An array appearing to the left of a 
specification arrow may be indexed, in which case only the 
selected positions are affected by the specification. For 


examples 


442 3 5 7 11 
XC1 3]<6 8 
Xx ; 

6 3 8 7 41 


The normal restrictions on indexing apply; in 
particular, a variable which has not already been assigned a 
value cannot be indexed, and an out-of-range index value 
cannot be used, 


Index origin. In Jl=origin indexing, X{1] is the leading 
element of the vector X¥ and X[p¥] is the last element. [In 
Q-origin indexing, X[0] is the leading element and X[1+pX]j 
is the last. 0-origin indexing is instituted by the command 
JORIGIN 0. The command )ORIGIN 1 restores l-origin 
indexing. The index origin in effect applies to all 


coordinates of all rectangular arrays. 


The function ORIGIN in Library 1 WSFNS may also be used 
to control the index origin. It may be executed within a 
function. (See Part 4,) 


In certain expressions such as +/[J]M and K¢[J1M (to be 
treated more fully in the two following sections), the value 
of J determines the coordinate of the array M along which 
the function is to be applied. Since the numbering of 
coordinates follows the index Origin, a change of index 
origin also affects the behavior of such expressions. 


The index origin also affects four other functions, the 
monadic and the dyadic forms of ? andi. The expression iN 
yields a vector of the first W integers beginning with the 
index origin. Hence X[i1N] selects the first components of 
X in either origin. Moreover, 11 is a one-element vector 
having the value 0 in 0-origin and 1 in l-origin; 10 is an 
empty vector in either origin. 
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The index origin remains associated with a workspace; 
in particular, the index origin of an active workspace is 
not affected by a copy command. A clean workspace provided 
on sign-on or by the command )CLEAR is in l-origin. All 
definitions and examples in this text are expressed in 
l-origin. 


space. If a vector or a row of a matrix requires more than 
one line, succeeding lines are indented. 


A matrix prints with all columns aligned and with a 
blank line before the first row. A matrix of dimension W,1 
prints as a single colum. 


FUNCTIONS ON ARRAYS 


There are four ways in which the scalar functions of 
Table 3.2 extend to arrays: element-by-element, reduction, 
inner product, and outer product. Reduction and outer 
product are defined on any arrays, but the other two 
extensions are defined only on arrays whose sizes satisfy a 
certain relationship called conformability. For the 
element-by-element extension, conformability requires that 
the shapes of the arrays agree, unless one is a scalar. The 
requirements for inner product are shown in Table 3.6. 


Scalar functions. All of the scalar functions of Table 3.2 
are extended to arrays element by element. Thus if ™ and W 
are matrices of the same size, f is a scalar function, and 
P«MEN, then PL[I;J] equals M[I;J]£NLI;J], and if @<«fN, then 


Q{I3:J] is equal to f£NW[I:J]. 


If Mand WN are not of the same size, then M£NV is 
undefined (and induces a length or rank error report) unless 
one or other of M and W is a scalar or one-element array, in 
which case the single element is applied to each element of 
the other argument. In particular, a scalar versus an empty 
array produces an empty array. 


An expression or function definition which employs only 
scalar functions and scalar constants extends to arrays like 
a scalar function. 


Reduction. The sum-reduction of a vector X is denoted by 
+/X and defined as the sum of all components of X. More 
generally, for any scalar dyadic function f, the expression 
£/X is equivalent to X(11£XC2]£...£X[pX], where evaluation 
is from rightmost to leftmost as usual. A user-defined 
function cannot be used in reduction. 
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If X is a vector of dimension zero, then £/X yields the 
identity element of the function f (listed in Table 3.5) if 
it exists; if X is a scalar or a vector of dimension i, then 
£/X yields the value of the single element of X. 


The result of reducing any vector or scalar is a 


scalar. 
Dyadic Identity Left- 
Function Element Right 


Times x 
Plus 
Divide 
Minus 
Power 
Logarithm 
Maximum 
Minimum 
Residue 


yea eee 
ey ey ee 


Equal 

Not equal 
Greater 

Not less 
Less 

Not greater 


logical 
arguments 
only 


Hee 

5 

Q: 
AANMNVHHH + €> <= O—--T@® + 1 


Table 3.5: IDENTITY ELEMENTS OF 
PRIMITIVE SCALAR 
DYADIC FUNCTIONS 


For a matrix M, reduction can proceed along the first 
coordinate (denoted by £/[1]¥) or along the second 
coordinate (f£/[2]M). The result in either case is a vector; 
in general, reduction applied to any non-scalar array A 


the term reduction). The numbering of coordinates follows 


the index origin, and an attempt to reduce along a 
non-existent coordinate will result in an index error. 
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Since +/[1]M scans over the row index of M it sums each 
column vector of M, and +/[2]M sums the row vectors of M. 


For example, if M is the matrix 


then +/[1]M is 5 7 9 and +/[2]M is 6 15. 


In reducing along the last coordinate of an array, the 
coordinate indicator may be elided -- thus +/M denotes 
summing over each of the rows of M and +/V denotes summing 
over the last (and only) coordinate of the vector /. 


Reduction over the first coordinate of M by a function 
f may be obtained by using the expression £4M. The symbol # 
is formed by overstriking the solidus with the minus sign. 


Inner product. The familiar matrix product is denoted by 
C+A+.xB. If 4 and B are matrices, then C is a matrix such 
that C{I;J] is equal to +/A[I;]xBfi;J]. A similar definition 
applies to Af.gB where f and g are any of the standard 
scalar dyadic functions. 


If A is a vector and B is a matrix, then C is a vector 
such that C[J] is equal to +/AxB[;J]. If B is a vector and 
A is a matrix, then C is a vector such that CLI] is equal to 
+/A[I;1xB. If both A and B are vectors, then A+.xB is the 
scalar +/AxB., 


The last dimension of the pre-multiplier A must equal 
the first dimension of the post-multiplier B, except that if 
either argument is a scalar, it is extended in the usual 
way. For non-scalar arguments, the dimension of the result 
is equal to (°1+4p4),14pB. (See the function drop in the 
section on Mixed Functions.) In other words, the dimension 
of the result is egual to (pA).9B except for the two inner 
dimensions (“t+tpA and 1+pB), which must agree and which are 
eliminated by the reduction over them. 


Definitions for various cases are shown in Table 3.6. 


Xe.gY and yields an array of dimension (pX),p¥, formed by 
applying g to every pair of components of xX and Y. 


Definition 
Z+AE.gB 


Z+£/AQGB 

Z+£/AgB 

Z+£/AgB 

Z+£/AQGB 
ZCIJ]+£/AgBL:T] 
ZUIIJ<£/ACLI;1gB 
Lf Jef /AgB Cs z] 
ZUIJ]+£/ACI;1gB 

Z0I3;71<«f£/ACI;]gBl3J7] 


Conformability 
pA oA£.gB | requirements 


V 


Table 3.6: INNER PRODUCTS FOR PRIMITIVE SCALAR 
DYADIC FUNCTIONS f AND g 


If xX and Y are vectors and 2Z+Xe.gY, then Z[I;/] is 
equal to X[I]gY{J]. For example: 


X13 
Y<i4 
Xo ,xyY 
1 2 3 4 
2 4 6 8 
3 6 9 12 
Xo,>yY 
1000 
1100 
1110 


If xX is a vector and Y is a matrix, and Z+Xo,gY, then 
ZUIsJ;K] is equal to X[I]gY[e3x]. Definitions for various 
cases are shown in Table 3.7. 


Definition 
Z+Ao.gB 


Z+AQB 
ZL II<AgGBL I] 
Z0II+ACLII1gB 
ZLI371<ALIIGBCSI 
ZCI3;7]<+AQGBLI37] 
ZLI371<+ACI;719gB 
ZCI3sJ3KI<ALTIQGBLI3K] 
ZCI373;KI<ALIT;J7IgGB(K] 


V 
U 
U 
V 
£ 
U 
f 
LP 


Table 3.7: OUTER PRODUCTS FOR PRIMITIVE 
SCALAR DYADIC FUNCTION g 
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MIXED FUNCTIONS 


Introduction. The scalar functions listed in Table 3.2 each 
take a scalar argument (or arguments) and yield a scalar 
result; each is also extended element by element to arrays. 
The mixed functions of Table 3.8, on the other hand, may be 
defined on vector arguments to yield a scalar result ora 
vector result, or may be defined on scalar arguments to 
yield a vector result. In extending these definitions to 
arrays of higher rank, it may therefore be necessary to 
specify which coordinate of an array the mixed function is 
applied to. The expression [~] following a function symbol 


indicates that the function is et ee to the dJth 
coordinate. If the expression is e ided, the function 


applies to the last coordinate of the argument array. These 
conventions agree with those uséd earlier in reduction. 


The numbering of coordinates follows the index origin. 


Transpose. The expression 2 18M yields the transpose of the 


matrix M; that is, if R«2 19M, then each element A[I;J] is 
equal to M[J;7J]. For example: 


M 2 18M 
1 2 3 4 4 5 9 
5 6 7 8 2 6 10 
9 10 it 12 3 y -Ae. 
4 8 12 


If P is any permutation of order ppA, then PRA is an 
array similar to A except that the coordinates are permuted: 
the Ith coordinate becomes the P[T]th coordinate of the 
result. Hence, if R+P8A, then (pR#)£P] is equal to pA. For 
example: 


A+2 3 5 791210 


oA 

2 3 5 7 
Pe2 34 1 
o PRA 

7 2 3 5 


Definition or example? 


pP <> 4 pF <> 3 4 05 ++ 10 


Size 


Reshape Reshape A to dimension V 3 40112 <> F 
1298 «> 112 Op# +> 10 


oA <> (x/pA)pA »E «7112 


Ravel 0,5 +> 1 


P.i2+> 235712 
PEL2] <+3 


Catenate ee lees ame Yo 


PC4 32.2 1] ++7 & 3 2 


Index34 BLAS eS) 2104 ea oy 2° 4 

11 10 9 
ECi;s] «++ 1234 ABCD 
ECL;1] «++ 15 9 "ABCDEFGHIJKL'(E] +> EFGH 


ISKL 


First S integers 14#++1234 


10 «+ an empty vector 


generators 


Index of3 Least index of A Pi3 <2 5 1 
in V, or itpV PiE +> 3 5 
; 4 4,4 <> 1 55 

Take or drop |V[I] first 
(VCT120) or last (V[I]<0) 


Take Vta 
Drop V+A elements of coordinate I 


Grade up35 |AA The permutation which A3 5 32 <> 4 1 3 2 
would order A (ascend- 
Grade down5|VyA ing or descending) V¥3532<«+2134 


Compress9S V/A 1041 0/P «+25 — 1014 0/E <+ 5 7 
9 11 
101/[1]F «<> 1 2 3 4 ++ 10 148 
9) 0" 1a 42 
A BCD 
1 Or tae ee 46. 1011 1\X¥ «+ EF FGH 


I SKL 
DCBA ISKL 
OX «> HGFE OL11X <> OX ++ EFGH 


Reverse? 


Mess oP ++ 75 32 ABCD 
BCDA 
Rotate® 30P <> 72 3 5 «+ ~16P 10 ~10X <> EPGH 
; LIEK 


AETL 
Coordinate I of A 2 1X <> BRI 
becomes coordinate CGK 
VLIT] of result 1 .1QF ++ 1611 DHL 


VRA 
Transpose 
Transpose last two coordinates 


0 411-0 
Membership |AcA oWeY <> pW BFeP «> 101 0 
j Pei4 <> 110 ~0 QQ 0 0 0 


Decode ViV 1011 7 7 6 «+ 1776 24 60 6011 2 3 ++ 3723 


aT 
Pas 


Encode Vrs 24 60 6073723 ++ 1 2 3 60 60T3723 <> 2 3 


W?Y «+ Random deal of W elements from iY 


‘Table 3.8: PRIMITIVE MIXED FUNCTIONS (see adjacent notes) 
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Restrictions on argument ranks are indicated by: S for 
scalar, V for vector, M for matrix, A for Any. Except as 
the first argument of S14 or S[A], a scalar may be used 
instead of a vector. A one-element array may replace any 
scalar. 


Arrays used 4 ABCD 
in examples: Pe>235 7 E 8 X <> EFGH 

910 11 12 IdSKL 
Function depends on index origin. 


Elision of any index selects all along that coordinate. 


The function is applied along the last coordinate; the 
symbols #, \, and ©® are equivalent to /, \, and o, 
respectively, except that the function is applied along the 
first coordinate. If [S] appears after any of the symbols, 
the relevant coordinate is determined by the scalar S. 


Notes to Table 3.8 


More generally, @8A4 is a valid expression if @ is any 
vector of dimension ppA whose elements are chosen from (and 
exhaust) the elements of 1[/Q. For example, if ppA is equal 
to 3, then ii 2 and 2141 andi 11 are suitable values for 
@ but 131 is not. Just as for the case PXA where P isa 
permutation vector, the Ith coordinate becomes the atrTith 
coordinate of @84. However, in this case two or more of the 
coordinates of A may map into a_ single coordinate of the 
result, thus producing a diagonal section of A as 
illustrated below: 


A<+3 3019 


A 
1 2 3 
4 5 6 “ 
7 8 @Q9 
1 184 
1 ob 9 


Table 3.9 shows the detailed definitions of 
transposition for a variety of cases. 


Monadic transpose. The expression 8A yields the array 4 
with the last two coordinates interchanged. For a vector V/V, 
Matrix M, and three dimensional array T7, the following 


relations hold: 


QV is equivalent to 18V (and hence to /) 
QM is equivalent to 2 10” (ordinary matrix transpose) 
87 is equivalent to 1 3 2aP7 


Rotate. If K is a scalar or one-element vector and X¥ is a 
vector, then KoX is a cyclic rotation of YX defined as 
follows: KX is equal to X[1+(oX)|~1+K+ipX¥]. For example, 
if X¥«2 35 7 11, then 26X is equal to 5 7 11 2 3, and 26x 
is equal Eo: 7 Bd | 2. 8 SS In O-origin indexing, the 


definition for KoX becomes X[(pX)|K+ipX]. 


If the rank of X exceeds 1, then the coordinate J along 
which rotation is to be performed may be specified in the 
form Z<«Ko[J]X. Moreover, the dimension of K must egual the 
remaining dimensions of X, and each vector along the Jth 
coordinate of X is rotated as specified by the corresponding 
element of K. A scalar K is extended in the usual manner. 


R<V 
R<M 
RUIsJI<MLI3T] 
RUII+M(I3T] 
R<T 
RUIs73KI<TLIsK3 7) 
RUIsJsK1<T0I3K3T] 
RUTsJ73KI+TUK:I3J7] 
RUIs:J1<?7(I3I37) 
RUIsJI]<70I37;7) 
RUIs7I]+TL073;737)] 
RUIIJ<TLI32;T) 


(pM)CL2 1] 

L /pM 

of 

CoP) Ct 3 25] 

(e7T)C3 1 2] 

(oP) [2 3: 4] 

(L/(e7)C1 23),¢07)03] 
(L/(Cef)E1 3]).0p7)£2] 
CEYCpFILS Bi 3.te7) 124 
Lier 


Table 3.9: TRANSPOSITION 


For example, if pX¥ is 3 4 and J is 2, then X must be of 
dimension 3 and Z[I;] is equal to K(IIJ¢XCT3;]. If J is 1, 
then ok must be 4, and Z(;f] is equal to K[T]$x[;I2]. If x is 
a three-dimensional array, then K must be a matrix ora 
scalar. For example: 


M 012 3oCL1JM 1 2 36[2]M 
a 2 3 4 1 6 11 4 2 3 4 1 
5 6 7 8 5 10 3 8 7 8 5 6 
9 10 11 #12 fe) 2 e- 29 12 9 10 11 


The expression KeX denotes rotation along the first 
coordinate of X. The symbol e is formed by overstriking a 0 
with a minus sign. 


Reverse. If xX is a vector and R<oX, then RF is egual to xX 


except that the elements appear in reverse order. Formally, 
R is equal to X[1+(pX)-1pX]. In O-origin indexing, the 


If A is any array, J is a scalar or one-element vector, 
and R+o[J]A, then RF is an array like A except that the order 
of the elements is reversed along the Jth coordinate. For 
example: 


A . of1]A4 oC 274 
4 2 3 uy 5 6 3 2 4 
4 5 6 1 2 3 6 5 4 


The expression $4 denotes reversal along the last 
coordinate of A, and eA denotes reversal along the first 
coordinate. For example, if A is of rank 3, then oA is 
equivalent to $[3]4, and eA is equivalent to OC1]A. 


Compress. The expression U/X denotes compression of X by U. 
If vis a logical vector (comprising elements having only 
the values 0 or 1) and ¥ is a vector of the same dimension, 
then y/X produces a vector result of +/U elements chosen 
from those elements of X corresponding to non-zero elements 
of Uy For example, if X<2 35 7 11 and U+1 0141 0 then 


U/X is 25 7 and (-~U)/X is 3 11. 


To be conformable, the dimensions of the arguments must 
agree, except that a scalar (or one-element vector) left 
argument is extended to apply to all elements of the right 
argument. Hence 1/X¥ is equal to XY and 0/X is an empty 
vector. A scalar right argument is not extended. The 
result in every case is a vector. 


If M isa matrix, then JU/[1]1M denotes compression 
along the first coordinate, that is, the compression 
operates on each column vector and therefore deletes certain 
rows. It is called column compression. Similarly, U/[2]mM 
(or simply YV/M) denotes row compression. The result in 
every case is a matrix. As in reduction, U/M denotes 
compression along the last coordinate, and U/M denotes 
compression along the first. 


Expand. Expansion is the converse of compression and is 
denoted by V\xX. If Y<U\X¥, then U/y is equal to X and (if X 
is an array of numbers) (~V)/Y is an array of zeros. In 
other words, U\X expands X to the format indicated by the 
ones in YU and fills in zeros elsewhere. To be conformable, 
+/U must equal xX. 


If x is an array of characters, then spaces are 
supplied rather than zeros, i.e., if Y+U\X then (~U)/Y is an 
array Of the space character ' ', Again, U\[J]M denotes 
expansion along the Jth coordinate, U\M denotes expansion 
along the last, and U\M denotes expansion along the first. 
See Table 3.8 for examples of expansion. 


A scalar left argument is not extended. 


Decode. The expression RiX denotes the value of the vector 
x evaluated in a number system with radices 
Fld desis 2 lege e's ge Lab ae de For example, if R+24 60 60 and 
X<1 2 3 is a vector of elapsed time in hours, minutes, and 
seconds, then RiX has the value 3723, and is the 
corresponding elapsed time in seconds. Similarly, 
10 10 10 10 1 17 7 6 is equal to 1776, and2221:1:%104%1 igs 
equal to 5. Formally, RiX is equal to +/WxX, where W is the 
weighting vector determined as follows: WoW] is equal to 
1, and WLI-1] is equal to R[II]xWiT]. For example, if fF is 
24 60 60, then W is 3600 60 1, 


The result is a scalar. 


The arguments # and X must be of the same dimension, 
except that either may be a scalar (or one-element vector). 
For example, 10 1 177 6 is equal to 1776. The arguments 
are not restricted to integer values. If X is a scalar, 
then x1C is the value of a polynomial in X with coefficients 
C, arranged in order of descending powers of X. 


The decode function is commonly applied in work with 
fixed-base number systems and is often called the base 


Encode. The encode function &TN denotes the representation 
of the scalar W in the base-R number system. Thus, if 
Z<«RtN, then (x/R)|N-Riz. is equal to zero. For example, 


a9 OO | bas 6 1 0 4 and 22.2 7 5-284 0.7 and 22 7T5 is 
Os The dimension of ATW is the dimension of Af. The 


Index of. If vy is a vector and S is a scalar, then J<«ViS 
yields the position of the earliest occurrence of S in V. 
If S does not equal any element of VY, then J has the value 
(11)+pV¥. Clearly, this value depends, as does any result of 
this function, on the index origin, and is one greater than 


the largest permissible index of V/V. 


If Ss is a vector, then J is a vector such that J(IJ is 
the index in V of S{I]j. For example: 


'ABCDEFGH'1'GAFFE! 
P Wicker, eS 


If X is a numerical vector, then the expression %1//X 
yields the index of the (first) maximum element in 4%. For 
example, if X is the vector 8 3 5 13 2 7 9, then [/X is 13 
and xXif/X is 4. 


The result in every case has the same dimensions as the 
righthand argument of 1. For example, | if Z<ViS, and S is a 
matrix, then Z[I;J] is equal to WiS(I;J]. 


Membership. The function X«Y yields a logical array of the 
same dimension as X. Any particular element of X<«Y has the 
value 1 if the corresponding element of X belongs to Y, that 
is, if it occurs as some element of Y. ‘For example, 
(17)e3 5 is equal to 00104100 and 'ABCDEFGH'«' COFFEE' 


equals 00104110 0. 


If the vector VY represents the universal set in some 
finite universe of discourse, then U«cA is the characteristic 
of the set A, and the membership function is therefore also 


The size of the result of the function « is determined 
by the size of the left argument, whereas the size of the 
result of the dyadic function 1 is determined by the size of 
the right argument. However, the left arguments of both 
frequently play the role of specifying the universe of 
discourse. 
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Take and drep. If V is a vector and S is a scalar between 0 
and pV, then S+V takes the first S components of /V. For 


example, if V+17, then 3+V is 1 2 3 and 0+V is 10, and 8tV 
yields a domain error. 


If S is chosen from the set ~ipV, then StV takes the 
last |S elements of V. For example, 3+V is 5 6 7. 


If A is an array, then WtA is valid only if W has one 
element for each dimension of A, and WII] determines what is 
to be taken along the Ith coordinate of A. For example, if 
A + 3 49112, then 2 ~3tA4 is the matrix 


The function drop (+) is defined analogously, except 
that the indicated number of elements are dropped rather 
than taken. For example, “114A is the same matrix as the 
one displayed in the preceding paragraph. 


The rank of the result of the take and drop functions 
is the same as the rank of the right argument. The take and 
drop functions are similar to the transpose in that the left 
argument concerns the dimension vector of the right 
argument. . 


Grade up and down. The function AV produces the permutation 
which would order V, that is VEAV] is in ascending order. 
For example, if V is the vector 7 1 16 5 3 9, then AV is the 
vector 254163, since 2 is the index of the first in 
rank, 5 is the index of the second in rank, and so on. The 


symbol 4 is formed by overstriking | and A. 


If P is a permutation vector, then AP is the 
permutation inverse to P. If a vector D contains duplicate 
elements, then the ranking among any set of equal elements 
is determined by their positions in D. For example, 
A5 3 7 3 9 2 is the vector 6 241 3 5, 


The right argument of 4 may be any array A of rank 
greater than zero, and the coordinate J along which the 
grading is to be applied may be indicated by the usual 
notation ALJI]A. The form 44 applies as usual to the last 
coordinate. The result of 44 is of the same dimension as A. 


The grade down function Y is the same as the function A 
except that the grading is determined in descending order. 
Because of the treatment of duplicate items, the expression 
A/(4V)=OVV has the value 1 if and only if the elements of 
the vector V are all distinct. 
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Deal. The function M?N produces a vector of dimension M 
obtained by making M random selections, without replacement, 
from the population iW. In particular, N?N yields a random 
permutation of order MW. Both arguments are limited to 
scalars or one-element arrays. 


Comments. The lamp symbol a, formed by overstriking n and 
o, Signifies that what follows it is a comment, for 
illumination only and not to be executed; it may occur only 
as the first character in a statement, but may be used in 
defined functions. 


MULTIPLE SPECIFICATION 


Specification (<) may (like any other function) occur 
repeatedly in a_e single statement. For example, the 
execution of the statement 2Z+XxA<«3 will assign to A the 
value 3, then multiply this assigned value of A by ¥X and 
assign the resulting value to Z. 


Multiple specification is useful for initializing 
variables. For example: 


X<Y¥+1+Z<0 
sets X¥ and Y to 1 and Z to 0. 


A branch may occur in a statement together with one or 
more specifications, provided that the branch is the last 
operation to be executed (i.e., the leftmost). For example, 
the statement +9x.1N>I+«I+1 first augments J, and then 
branches to statement S if W exceeds the new value of I. 


In the expression Z~+(A+B)x(C+D) ait ais immaterial 
whether the left or the right argument of the <x is evaluated 
first, and hence no order is specified. The principle of no 
specified order in such cases is also applied when the 
expressions include specification. Since the order here is 
sometimes material, there is no guarantee which of two or 
more possible results will be produced. 


Suppose, for example, that A is assigned the value 5 
and the expression 2Z+(A<3)xA is then executed. If the left 
argument of x is executed first, then A is assigned the 
value 3, the right argument then has the new value 3 and Z 
is finally assigned the value 9. If, on the other hand, the 
right argument is evaluated first it has the value 5 
initially assigned to A, the value 3 is then assigned to.A 
and multiplied by the 5 to yield a value of 15 to be 
assigned to Zz. 


SYSTEM DEPENDENT FUNCTIONS 


There are three main types of information about the 
state of the system which are of value to the user: 


1. general information common to all users, such as 
date, time of day, and the current number of terminals 
connected to the system. 


2's information specific to the particular work 
session, such as the time of sign-on, the central 
computer time used, and the total keying time. 


3. information specific to the active workspace, such 
as the amount of storage available, and the condition 
of the state indicator. 


This information is provided by a single family of 
functions denoted by I (formed by overstriking T, andl), 
and called the JI=Beam functions. The individual member 
function is selected by the argument as shown in Table 3.10. 
Times are all in units of one~sixtieth of a second, the date 
is given as a six-digit integer in which the successive 
digit pairs specify the month, day, and year, and the 
available storage is given in bytes. 


The byte is a unit of storage equal to 8 binary digits. 
A variable requires for storage a small number of bytes of 
overhead, plus a certain number of bytes per element 
depending upon the form of its representation: 1 if the 
elements are characters, 0.125 if the elements are logical, 
4 if the elements are integers less than 2*31 in magnitude, 
and 8 for other numbers. 


In designing an algorithm for a particular purpose, it 
frequently happens that one may trade time for space; that 
is, an algorithm which requires little computer time may 
require more storage space for intermediate results, and an 
algorithm which requires little storage may be less 
efficient in terms of time. Hence, the information provided 
by the functions 121 (computer time used) and 122 (available. 
storage space) may be helpful in designing algorithms. For 
example, the function T7IMF of Appendix B can be used to 
determine the computer time used in the execution of a 
function. 


Moreover, since the functions 121 and 122 can, like all 
of the I-beam functions, be used within a defined function, 
they can be used to make the execution dependent upon the 
Space available or the computer time used. 
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Definition of 1X 
Accumulated keying time (time during which the keyboard 
has been unlocked awaiting entries) during this session. 
The time of day. 

central computer time used in this session. 

amount of available space (in bytes). 

number of terminals currently connected. 

time at the beginning of this session. 

date. 

first element of the vector 127. 

vector of statement numbers in the state indicator. 


All times in 1:60 seconds 
2. Date is represented by a 6-digit integer; 
digit pairs represent month, day, and year. 

3. 1327 yields a vector; all other results are scalars. 


successive 


Table 3.10: SYSTEM DEPENDENT FUNCTIONS 


Keying time is defined as the total accumulated time 
since sign-on during which the keyboard has been unlocked 
awaiting entry. The associated function (119) may be used 
in. conjunction with 0 or M input to determine the amount of 
time taken by a student in responding to a question. The 
following example shows the definition and use of a 
multiplication drill which tells the student how long he has 
taken (in whole minutes and seconds) to answer each 
question: 


VMULTDRILL N;X;Y;TIME 


C1] O<Y<?N 
[2] TIME<1I19 
{3] xO 
Cy] TIME<+(119)-TIME 
[5] +8x1X#x/Y 
[6] ‘TIME: '32460 60 60TTLIME 
C7] +1 
[38] "WRONG, TRY AGAIN' 
[9] >3V 
MULTDRILLE 12 12 
6 3 
Ol: 
18 
TIME: OQ 3 
y5 
30 


WRONG, TRY AGAIN 


O: 


> 
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Such a drill could be expanded to accumulate statistics of 
the student's response times or to use some function of the 
response times to control the difficulty of the questions 
posed, 


Since times are expressed in units of 1:60 seconds, the 
time in hours, minutes, and seconds can be determined by an 
expression of the form 3424 60 60 60TI20. Similarly, a 
3-element vector representing the date can be obtained from 
the expression (3p100)Tzr25. 


The expression 127 provides the vector of statement 
numbers in the state indicator, with the first position 
occupied by the number of the statement on which the 
innermost function is suspended. If no functions are 
suspended, the vector 127 is empty. 


The expression 126 yields a scalar which is the first 
element of 127. It is therefore equal to the number of the 
statement being, or about to be, executed and is 
particularly useful in branches. For example, +N+I26 causes 
a forward jump of N statements. Moreover, entering +126 is 
a safe way to resume execution without having to read and 
enter the statement number printed at the point of the last 
suspension, It is even more convenient to resume by 
entering >C, after first defining the function C as follows: 


VZ<C 
[1] Z2+(I27)L2]V 
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PART 4 
LIBRARY FUNCTIONS 


A user may load or copy functions from any workspace 
for which he knows the library number and workspace name 
(and password, if any). Moreover a listing of the 
workspaces in Library JW can be obtained by the command 
)LIB N for any public library, i.e., for any library whose 


number is below 1000. 


A public library may be used for the casual sharing of 
functions among a group of co-workers. When intended for 
more general use, a_ library function should be thoroughly 
tested and well-documented, and should incorporate messages 
for the guidance of the user. It is therefore good practice 
to restrict certain of the public libraries to such 
functions as are of general interest and have passed 
appropriate acceptance tests. 


In the APL\360 system as distributed, Library 1 is 
restricted in this manner. This section treats each of the 
workspaces in this library by loading each and displaying 
the descriptions contained in the workspaces themselves. 
Further intormation on the functions in each workspace can 
(except in the case of the locked functions in WSFNS) be 
obtained by displaying the function definitions. 


LOAD 1 ADVANCEDEX 
ADVANCEDEX SAVED 07/14/68 16.53.19 


)FNS 
AH ASSOC BIN COMB DTH ENTER PF FC 
GC GCD GCV HILB HTD IN INV INVP 
IN1 LFC LOOKUP PALL PER PERM PO POL 
POLY POLYB RESET TIME TRUTH ZERO 

DESCRIBE 


BACH OF THE VARIABLES OF THIS WORKSPACE WHICH BEGINS. WITH THE 
LETTER D IS THE DESCRIPTION OF THE FUNCTION WHOSE NAME IS 
OBTAINED BY REMOVING THE D. FOR FURTHER DETAILS SEE APPENDIX 
B OF THE APL\360 MANUAL. 


)LOAD 1 PLOTFORMAT 
PLOTFORMAT SAVED 07/20/68 $1207.27 
)FNS 
AND DESCRIBE DFP EFT PLOT Vs 


DESCRIBE 
THE FUNCTIONS INCLUDED IN THIS WORKSPACE ARE LISTED BELOW: 


SYNTAX DESCRIPTION 

ZA AND B ESSENTIALLY A COLUMN-CATENATOR, WITH SOME EXTRA 
EFFECTS WHEN THE ARGUMENTS ARE NOT MATRICES. 
THIS FUNCTION IS DESIGNED TO BE USED EITHER 
INDEPENDENTLY, OR IN CONJUNCTION WITH VS, IT 
PROVIDES A CONVENIENT WAY OF FORMING INPUT 
TO DFT AND EFT. 


Z+A DFT B FORMS FIXED-POINY OUTPUT, MORE DETAILED DIREC- 
[IONS CAN BE FOUND IN THE VARIABLE HOWFORMAT. 


Z+A EFT B FORMS EXPONENTIAL OUTPUT. MORE DETAILED DIREC- 
LIONS CAN BE FOUND IN THE VARIABLE HOWFORMAT. 


A PLOT B GRAPHS ONE OR MORE FUNCTIONS SIMULTANEOUSLY. 
DIRECTIONS FOR USING PLOT CAN BE FOUND IN THE 
VARIABLE HOWPLOT. 


Z+A VS B ESSENTIALLY A COLUMN-CATENATOR, SIMILAR TO AND, 
EXCEPT THAT THE RIGHT-HAND ARGUMENT MUST BE OF 
RANK < 1. IVT IS DESIGNED PRIMARILY TO PROVIDE 
CONVENIENT FORMATION OF INPUT TO PLOT FUNC- 
PION. WHETHER USED BY ITSELF OR WITH AND, VS 
WILL CAUSE ITS RIGHT ARGUMENT TO APPEAR AS THE 
LEFTMOST COLUMN OF THE RESULTANT ARRAY. (THE 
RESULTANT WILL BE AN ARRAY OF RANK THREE, 
CONSISTING OF A SINGLE PLANE). 


BOTH AND AND VS WORK WITH EITHER 1 OR O-ORIGIN INDEXING. 


HOWFORMAT 


THE FUNCTIONS DFT AND EFT WILL ARRAY NUMBERS IN DECIMAL AND 
EXPONENTIAL FORM, RESPECTIVELY, FOR TABULAR OUTPUT. THEY 
MAY BE USED TO GENERATE IMMEDIATE OUTPUT, OR TO STORE AN 


IMAGE 


AND 


THESE 


RIGHT 


FOR LATER PRINTING. THE TWO FORMS ARE: 


PATTERN DFT TABLE 
PATTERN EFT TABLE 


IMAGE*PATTERN DFT TABLE 
IMAGE*PATTERN EFT TABLE 


FUNCTIONS WORK PROPERLY ONLY WITH 1-ORIGIN INDEXING. 
ARGUMENT: AN ARRAY TO BE FORMED. 


IT MUST BE NUMERICAL, AND OF RAWK Ss 3. THE FIRST 
PLANE OF A 3-DIMENSIONAL ARRAY WILL BE TREATED AS A 
MATRIX, AND ALL OTHER PLANES WILL BE DISREGARDED. 
ARRAYS OF HIGHER RANK WILL BE SIGNALLED AS A ‘RANK 
PROBLEM, ' 


LEFT ARGUMENT: ONE OR MORE INTEGERS TO CONTROL THE FORMAT. 


FRACTIONAL NUMBERS WILL BE SIGNALLED AS A ‘DOMAIN 
PROBLEM .,' 


A SINGLE INTEGER: 

DFT: SPECIFIES THE NUMBER OF DIGITS TO THE RIGHT OP 
THE DECIMAL POINT IN DECIMAL FORMAT. 

EFT: SPECIFIES THE NUMBER OF SIGNIFICANT DIGITS IN 
EXPONENTIAL FORMAT. ON& DIGIT ALWAYS APPEARS T0 THE 
LEFT OF THE DECIMAL POINT. COLUMNS WILL BE SPACED 
UNIFORMLY, WITH SPACING SUCH THAT THERE WILL BE TWO 
SPACES BETWEEN THE CLOSEST NUMBERS. 


A PAIR OF IWTEGERS: THE FIRST SPECIFIES THE TOTAL 
NUMBER OF SPACES TO BE ALLOCATED TO EACH COLUMN, AND 
THE SECOND IS USED AS ABOVE. 

DFT: THE FIRST WUMBER MUST BE AT LEAST TWO LARGER 
THAN THE SECOND. 

EFT: THE FIRST NUMBER MUST BE AT LEAST SIX LARGER 
THAN THE SECOND. IF THE LEFT NUMBER IS TOO SMALL, 
THIS WILL BE SIGNALLED AS A ‘DOMAIN PROBLEM. ' 


MORE THAN ONE PAIR OF INTEGERS: THERE MUST BE OWE PAIR 
FOR EACH COLUMN OF OUTPUT (OR EACH ELEMENT OF A. VEC- 
TOR). EACH PAIR WILL BE INTERPRETED AS ABOVE, AND 
WILL APPLY TO THE LAYOUT OF THE CORRESPONDING COLUMN. 
IF THE WUMBER OF PAIRS DOES NOT MATCH THE NUMBER OF 
COLUMNS, THIS WILL BE SIGNALLED AS A ‘LENGTH PROBLEM.' 


HOWPLOT 


THE FUNCTION PLOT WILL GRAPH ONE OR MORE FUNCTIONS 
SIMULTANEOUSLY, AUTOMATICALLY SCALING THE VALUES T0 FIT 
APPROXIMATELY WITHIN SCALE DIMENSIONS SPECIFIED BY THE USER. 
IT WILL WORK ONLY IN 1-ORIGIN INDEXING. 


THE FORM IN WHICH PLOT Is USED IS: 


SCALESIZE PLOT FUNCTION 


LEFT ARGUMENT: ONE OR TWO NUMBERS. 


RIGHT 


THE FIRST NUMBER SPECIFIES THE APPROXIMATE SIZE OF THE 
VERTICAL AXIS AND THE SECOND NUMBER DOES THE SAME 
FOR THE HORIZONTAL AXIS. 


IF ONLY ONE NUMBER IS SUPPLIED, IT IS APPLIED TO BOTH 
AXES , 


THERE IS NO BUILT-IN LIMIT TO THE DIMENSIONS, AND A 
HORIZONTAL AXIS LARGER THAN THE WORKSPACE WIDTH WILL 
CAUSE SOME POINTS TO BE PRINTED OWN THE NEXT LOWER 
LINE, 


ARGUMENT: A RECTANGULAR ARRAY WITH RANK < 3. 
SCALAR: WILL BE TREATED AS A VECTOR OF LENGTH ONE. 


VECTOR: WILL BE PLOTTED AS ORDINATE AGAINST ITS OWN 
INDICES AS ABSCISSA, 


MATRIX: THE LEFTMOST COLUMN WILL BE TAKEN AS’ THE 
ABSCISSA AND ALL OTHER COLUMNS WILL BE PLOTTED AS 
ORDINATES . A DIFFERENT PLOTTING SYMBOL UP TO THE 
NUMBER OF SYMBOLS AVATLABLE WILL BE USED FOR EACH 
COLUMN. IN CASE TWO ORDINATES HAVE A COMMON POINT, 
THE SYMBOL FOR THE COLUMN FURTHEST TO THE RIGHT WILL 
BE USED. 


3-DIMENSIOWAL ARRAY: THE FIRST PLANE WILL BE PLOTTED 
AS A MATRIX, AND ALL OTHER PLANES WILL BE DISREGARDED. 


AUXILIARY FUNCTIONS : THE FUNCTIONS AND AND VS CAN BE 
USED TO GENERATE THE RIGHT ARGUMENT IN THE PROPER FORM 
FOR PLOT. FOR EXAMPLE: 


20 PLOT Z AND Y VS X 


PLOT CHARACTERS: THE SYMBOLS USED ARE ASSIGNED TO THE 
VARIABLE PC IN LINE 1 OF PLOT. THE ALPHABET 
SUPPLIED IS '‘'oxcoVAU!. THIS ALPHABET MAY BE EXTENDED 
AND MODIFIED AS DESIRED, USING THE NORMAL 


PUNCTION-EDITING PROCEDURES: EITHER CHANGE LINE 1 OF 
THE FUNCTION, OR DELETE IT AND INDEPENDENTLY SPECIFY 
A VALUE FOR PC. 


HISTOGRAMS: PLOT CAN BE USED TO GENERATE HISTOGRAMS BY 
SETTING THE VARIABLE HS TO 1 IN LINE 2 OF THE 
FUNCTION. ALTERNATIVELY, LINE 2 CAN BE DELETED, AND 


HS CAN BE SET EXTERNALLY. 


)ZOAD 1 APLCOURSE 
APLCOURSE SAVED 07/19/68 25:9 .9:8%:06 


)FNS 
Bix CHECK DESCRIBE DIM DRILL DYAD1 DYAD2 
EASY EASYDRILL FORM FUNDRILL GET INPUT 
INTER LOG QUES RANDOM REDSCAPATCH REPP 


SETPARAMETERS TEACH TRACE 
DESCRIBE 
THE MAIN FUNCTIONS IN THIS LIBRARY WORKSPACE ARE: 


TEACH 
EASYDRILL 


ALL OTHER FUNCTIONS ARE SUBFUNCTIONS AND ARE NOT 

SELF-CONTAINED. 

SYNTAX "DESCRIPTION 

TEACH AN EXERCISE IN APL FUNCTIONS USING SCALARS 
AND VECTORS. THE FUNCTION PRINTS OUT THE 
CHOICES AND OPTIONS AVAILABLE. EXAMPLES 
ARE SELECTED AT RANDOM WITH A RANDOM 
STARTING POINT. 


EASYDRILL THIS IS THE SAME AS TEACH EXCEPT THAT THE 
PROBLEMS SELECTED ARE GENERALLY SIMPLER IN 
STRUCTURE. PROBLEMS INVOLVING VECTORS OF 
LENGTH ZERO OR ONE ARE EXCLUDED. 


NOTE: FOR EITHER FUNCTION, A RESPONSE OF - PLEASE - WILL 
DISCLOSE THE PROPER ANSWER, A RESPONSE OF - STOP - WILL 
TERMINATE THE DRILL. 


TEACH 
ARE YOU ALREADY FAMILIAR WITH THE INSTRUCTIONS? (TYPE 
Y FOR YES AND NW FOR WO.) 
N 


THIS IS AN EXERCISE IN SIMPLE APL EXPRESSIONS. YOU WILL 
FIRST HAVE THE OPPORTUNITY TO SELECT THE FEATURES YOU WISH 
TO BE DRILLED IN. THE EXERCISE THEN BEGINS. FOR EACH 
PROBLEM YOU MUST ENTER THE PROPER RESULT. ANSWERS WILL 
CONSIST OF SCALAR INTEGERS IF EXERCISES WITH VECTORS ARE NOT 
DESIRED; OTHERWISE ANSWERS WILL CONSIST OF SCALARS OR 
VECTORS, A VECTOR OF LENGTH ZERO REQUIRES THE RESPONSE 10, 
A VECTOR OF LENGTH ONE REQUIRES THE RESPONSE X, WHERE X IS 
THE VALUE OF THE ELEMENT. YOU HAVE THREE TRIES FOR EACH 
PROBLEM, TYPE STOP AT ANY TIME TO TERMINATE THE EXERCISE 
AND PRODUCE A RECORDING OF YOUR PERFORMANCE. TYPING 
STOPSHORT WILL TERMINATE THE EXERCISE BUT WILL NOT PRODUCE 
A RECORD OF PERFORMANCE. TYPING PLEASE FOR ANY PROBLEM 
WILL LET YOU PEEK AT THE ANSWERS. TYPE Y UNDER EACH 
FUNCTION FOR WHICH YOU WANT EXERCISE: 


SCALAR DYADIC FUNCTIONS 
+-xXtx[L <<=2>2![ Avene 
YYYYY aA 
SCALAR MONADIC FUNCTIONS 
sere 2 Oe | 
YY. 
[TYPE Y IF EXERCISES ARE TO USE VECTORS, N OTHERWISE 
N i: 


6x 3 
O: 
18 
L~2.5 
O: 
2 
TRY AGAIN 
O: 
-3 
O+7 
Ol: 
STOPSHORT 


)LOAD 1 WSPNS 
WSFNS SAVED 07/20/68 Sig 25.23 


)FNS 
DELAY DESCRIBE E DIGITS ORIGIN SETLINK SFEI WIDTH 


DESCRIBE 


THE FUNCTIONS ORIGIN, WIDTH, AND DIGITS ARE EACH 
SIMILAR TO THE COMMAND OF THE SAME NAME, EXCEPT THAT EACH IS 
A FUNCTION RATHER THAN A COMMAND AND MAY THEREFORE BE USED 
WITHIN OTHER FUNCTIONS. EACH HAS AN EXPLICIT RESULT WHICH 
IS THE PREVIOUS VALUE OF THE RELEVANT SYSTEM PARAMETER. 


FOR EXAMPLE, THE FOLLOWING FUNCTION: 


VF X 
Ci] X*ORIGIN X 
[2] G 


Ea X*ORIGIN x¥ 


WILL EXECUTE THE FUNCTION G WITH WHATEVER INDEX ORIGIN I& 
SPECIFIED BY THE ARGUMENT OF F, AND WILL RESTORE THE INDEX 
ORIGIN TO THE VALUE THAT IT HAD BEFORE THE EXECUTION OF F. 


THE POLLOWING FUNCTIONS ARE ALSO AVAILABLE: 


SYNTAX DESCRIPTION 

Z+SETLINK X SETS THE VALUE OF THE LINK IN THE CHAIN OF 
NUMBERS GENERATED IN THE USE OF THE ROLL AND 
DEAL FUNCTIONS, THE EXPLICIT RESULT PRODUCED 
BY SETLINK IS THE PREVIOUS VALUE OF THE LINK. 


THE RESULTS PRODUCED BY THE ROLL AND DEAL 
FUNCTIONS ARE NOT THE LINKS THEMSELVES, BUT 
RATHER SOME FUNCTION OF THEM. THE LENGTH OF 
THE CHAIN (BEFORE REPETITION) IS 1+2*81. 


DELAY X DELAYS EXECUTION FOR X SECONDS. 

SFEI X SETS THE SIGNAL MESSAGE FOR EVALUATED INPUT 
(SEE THE SECTION ON INPUT AND OUTPUT, PART 3 
OF THE APL\360 USER'S MANUAL). THE ARGUMENT 


MUST BE A LINE OF NO MORE THAN 7 CHARACTERS. 


)LOAD 1 TYPEDRILL 
TYPEDRILL SAVED 07/14/68 19,42,16 


)FNS 
DESCRIBE Iw INSTRUCTIONS MATCH PRT QUERY 
STATISTICS TIME TYPEDRILL Ws 

DESCRIBE 


THE MAIN FUNCTION IN THIS WORKSPACE TIS PYPEDRILL; ALL 
OTHERS ARE SUBFUNCTIONS. TO USE IT, SIMPLY ENTER 


TYPEDRILL 


[YPEDRILL IS A TIMED TYPING EXERCISE. THE SYSTEM 
RESPOWDS WITH THE STATEMENT ‘YOU ARE IN CONTROL STATE', 
FOUR COMMANDS ARE AT YOUR DISPOSAL: ENTER, DRILL, STAT, AWD 
STOP. ENTERING ONE OF THEM BRINGS You INTO THAT STATR: 


ENTER: YOU MAY ENTER ONE-LINE SENTENCES OR 
BXPRESSIONS ON WHICH YOU WISH TO BE DRILLED. ENTERING 
A BLANK LINE (CARRIAGE RETURN ONLY) RETURNS YOU TO THE 
CONTROL STATE, 


DRILL: ONE OF THE LINES ENTERED VIA THE ENTER STATE IS 
SELECTED AT RANDOM AND PRINTED. YOU ARE THEN EXPECTED 
LO ENTER THE SAME LINE. IF If IS CORRECT, THE TIME 
TAKEN IS PRINTED (IW SECONDS), IF NOT YOU ARE ASKED TO 
RETYPE IT, A BLANK LINE CAUSES RETURN TO THE CONTROL 
STATE, 


STAT; THE ACCUMULATED STATISTICS ARE PRINTED, THE 
HORIZONTAL AXIS SHOWS THE TRIAL NUMBERS AND THE 
VERTICAL SHOWS THE TIME IN SECONDS. A VERTICAL ARROW 
INDICATES THAT THE TIME EXCEEDED THE LIMITS OF THE 
GRAPH, THE RETURN TO THE CONTROL STATE IS AUTOMATIC. 


STOP: STOPS THE DRILL AND PRINTS THE STATISTICS. 


TYPEDRILL 


CONTROL WORDS ARE: ENTER, DRILL, STAT, 


YOU ARE IN CONTROL STATE 

ENTER 

NOW IS THE TIME FOR ALL GOOD MEN TO 
I SING OF OLAF GLAD AND BIG 
X«|[PxQ@t+Y*xRs5 


YOU ARE IN CONTROL STATE 

DRILL 

NOW IS THE TIME FOR ALL GOOD MEN TO 

NOW IS THE TIME OFR ALL GOOD MEN TO 
A 

NOW IS THE TIME FOR ALL GOOD MEN TO 

16.9 

X+|[PxQ+Y*Rs5 

X<«|[PxQ+Y*Rs5 

19.9 

I SING OF OLAF GLAD AND BIG 


YOU ARE IN CONTROL STATE 
STOP 


COME 


COME 
COME 


COME 


AND STOP. 


TO 


TO 
TO 


TO 


Appendix A 
SAMPLE TERMINAL SESSION 
)1776 
010) 19.32.36 07/03/68 JANET 


APZE\ 360 


FUNDAMENTALS 

3x4 : Entry automatically indented 
12 Response not indented 

X*3x4 X is assigned value of 

the expression 

X 
12 Value of X typed out 

Y<"5 Negative sign for negative 

constants 

X+Y 
7 

144k 2 Exponential form of constant 
1.44 

P+1 2 3 4 Four-element vector 

PxP Functions apply element by element 
1 4 9 16 

Pxy Scalar applies to all elements 
“gee + atOe: = Cie OO 

Q<'CATS' Character constant (4-element 

Q vector) 
CATS 

Y2Z<5 Multi-character names 

YZ1+«5 

YZRYZ4 
10 

3+4x5+6 Correction by backspace 

Vv and linefeed 
+546 

18 

X<3 

Lol 

(XxY)+4 
16 

Xx Y+4 Executed from right to left 
24 


xX Y Entry of invalid expression 
SYNTAX ERROR Shows type of error committed 
xX Y Retypes invalid statement with 


A caret where execution stopped 


XY Multi-character name (not XxY) 
VALUE ERROR 
XY XY had not been assigned a value 
A 
SCALAR FUNCTIONS 
4x 3P 5.4 Dyadic maximum 
20.4 
(4x3)f5.1 
12 
4x[ 5.1 Monadic ceiling 
24 
X15 Index generator function 
Xx 
1 2 3 y 5 
10 Empty vector 
prints as a blank line 
Y¥*5~X All scalar functions extend 
Y to vectors 
4 3 2 1 6) 
AY 
4 3.3 +4 5 
XSY Relations produce 
a. Oa Ot logical (0 1) results 
O1 Pixi 
3.441592654 
Ot1 2 Piti 2 
3.141592654 1,.570796327 
X45 90 
OX+180 Conversion of X to radians 
0.7853981634 1.570796327 
1o4 Sin Il 
0.8418709848 
201 2 Cos 1 2 
0.5403023059 “0.4161468365 
3014 Tan 1 
1.557407725 
“301 Arctan 1 
0.7853981634 
30° 3017 Tan Arctan 1 234567 
1. -:2 3° ~=4 5 6 7 
Y+«1 2 
Loy (14+Y*2)*.5 
1,.444213562 2,236067977 
OOTY (1-FYx2)%,5 
0 0O.8660254038 
701 2 Tanh 1 2 
0. 761594156 0.9640275801 
70701 2 Arctanh Tanh 1 2 
1 2 


DEFINED FUNCTIONS 


VEEN EY Header (2 args and result) 
[1] ZH (X*2)+Yx2)%.5 - Function body 
[oq Vv Close of definition 
3 F 4 Execution of dyadic function F 
5 . 
P<7 
Q<+(P+1)F P-1 Use of F with expressions 
@ as arguments 
10 
4x3 F 4 
20 
VB+G A G is the signum function 
Cad B+(A>0)-A<0 . A and B are local variables 
p24 Vv 
G4 
1 
G 6 
“a 
X< "6 
GX 
-4 
VA A Like G but has no explicit result 
1] P+(4>0)-A<0 P is a global variable 
L239 Vv 
H’6 
P 
= 
Y+H 6 H has no explicit result 
VALUE ERROR and hence produces a value 
Y+H 6 error when used to right 
A of assignment 
VZ<+FAC N3I FAC is the factorial function 
C1] Z+1 
[2] I+0 
Es J Li:I«T+1 Ll becomes 3 at close of def 
C4] +OxiT>N Branch to O (out) or to next 
Eo ZeZxI 
L6] >L1 Branch to Ll (that is, 3) 
[7] Vv 
FAC 3 
6 
FAC 5 
120 
TAFAC*3 5 Set trace on lines 3 and 5 of FAC 
X*FAC 3 
FAC[L3] 1 Trace of FAC 
FAC(5] 1 
FACL3] 2 
FACL5] 2 
FACL3] 3 
FACL5] 6 
FACLT3] 4 
TAFAC+<0 Reset trace control 


A.3 


VG<M GCD N 


G<N 
M<M\|N 
>4xMZ0 
LilG<mM 
C4IN<+G 
C10] 
G<M 
[OJ 
G<«M GCD WN 
G<M 
M<M|W 
>4xM20 
N<G 


ae 
v 
36 GCD uy 


VGCD 
C4.11M,N 
COI 

G<+M GCD W 
G<M 
M<M|N 
+4xMZ0 
N<G 

M,N 

>1 


V 
36 GCD 44H 


VGCDLOIV 
G<M GCD N 
G<M 
M<M|N 
>4xM40 
N<G 

M,N 


>1 


VGCD 
C5] 

A 
Vv 


MECHANICS OF 
FUNCTION DEFINITION 


Greatest common divisor 
function based on the 
Euclidean algorithm 


Correction of line l 
Resume with line 4 
Display line l 


Display entire GCD Function 


Close of display, not close of def 
Enter line 5 

Close of definition 

Use of GCD 

4 is GCD of 36 and 44 

Reopen def (Use V and name only) 
Insert between 4 and 5 

Display entire function 


Fraction stays until close of def 


End of display 


Close of definition 


Iterations printed by 

line 5 (was line 4.1) 
Final result 
Reopen, display, and close GCD 


Line numbers have been 
reassigned as integers 
Close (Even number of V's in all) 
Reopen definition of GCD 
Delete line 5 by linefeed 


Close definition 


VZ+ABC X 
[1] Z+(33xQ+(Rx5)-6 
[2] [103] 
Ci] Z<(33xQ@+(Rx5)-6 
f i fi 
[1] Z+(3xQ)+(7x5)-6 
[2] Vv 
FAC 5 
120 
)ERASE PAC 
FAC 5 
SYNTAX ERROR 
FAC 5 
A 
VZ<BIN W 


[1] LA:2Z*«(Z,0)+0,2 
[2] +LAxN20ZV 
BIN 3 
VALUE ERROR 
BIN[1] LA:2+(2Z,0)+0,2 
A 


Zo 
>1 
4 3 3 1 
BIN 4 
VALUE ERROR 
BINC1] £21:2+«(2,0)+0,24 
A 


VBIN(L.1]2Z<1V 


STI 
BINLAS x 
+4 
1 4 6 4 1 
VBINLOIV 
VY Z<BIN WN 
[1] Re4 


[2] LA:Z+(Z,0)+0,2 
ee +LAxN2pZ 


SABIN<2 
Q<BIN 3 


BIN[ 2] 
Z 


1 
+2 


BIW(L 2] 
+2 


BINL 2] 
+0 


A function to show line editing 
A line to be corrected 
Initiate edit of line l 
Types line, stops ball under 9 
Slash deletes, digit inserts spaces 
Ball stops at first new 
space. Then enter ) Tf 
FAC still defined 


Erase function FAC 
Function FAC no longer exists 


An (erroneous) function for 
binomial coefficients 


Suspended execution 


Assign value to 2@ 
Resume execution 
Binomial coefficients of order 3 


Same error (local variable Z 
does not retain its value) 


Insert line to initialize 2 
Display state indicator 

Suspended on line 1 of BIN 

Resume execution (BIN now correct) 


Display revised function 
and close definition 


Set stop on line 2 
Execute BIN 


Stop due to stop control 
Display current value of @ 


Resume execution 


Stop again on next iteration 
Resume , 


Stop again 
Branch to 0 (terminate) 


A.5 


VMULTDRILL N3¥3X 


C1] Y<«?N 
2a ow 
C3] X<Q 


C4] sOxiX=t St 
[5] >1X=x/Y 


C6] "WRONG, TRY AGAIN! 
[7] >+3V 
MULTDRILL 12 12 
2 10 
UO: 
37 
WRONG, TRY AGAIN 
O: 
20 
6 7 
Oi: 
gt 
VZ<+ENTERTEXT 
[i] Zeit 


[2] D+oZ 
ee 2+Z,0 
C4] >2xDz#oZ 
[5] Vv 
Q<ENTERTEXT 
“THIS IS ALL 
CHARACTER INPUT 


Q 
THIS IS ALL CHARACTER INPUT 
N<5 
"NOTE: 1'3N3' ITS '"siN¥ 
NOTE:15 IS 1 2 3. 4 5 


P<2 35 7 
oP 


T<'OH MY' 
or 
5 
PP 
2 3 5 7 2 3 5 7 
DP. 
OH MYOH MY 
L,P 
DOMAIN ERROR 
L,P 
A 


INPUT AND OUTPUT 


A multiplication drill 

eV random integers 

Print the random factors 

Keyboard input 

Stop if entry is the letter § 
Repeat if entry is correct product 
Prints if preceding branch fails 
Branch to 3 for retry 

Drill for pairs in range 1 to 12 


Indicates that keyboard entry 
is awaited 


Entry of letter S stops drill 

Example of character (MM) input 

Make Z an empty vector 

D is the length of Z 

Append character keyboard entry 

Branch to 2 if length increased 
(i.e., entry was not empty) 


Keyboard 
entries 
Empty input to terminate 


Display Q 


Mixed output statement 


RECTANGULAR ARRAYS 


Dimension of P 


Character vector 


Catenation 


Characters cannot be catenated 
with numbers 


2 3 
7 11 
OH M 
YOH 

2 3 
2 3 
5 

2 5 
2 3 
13 

3 

28 3 


M+2 302 3 5 7 11 13 


5 7 114 18 
5 7 14 13 
P<+,M 
P[3] 


PEAS 36.1 


A«'ABCDEFGHIJKLMNOPQ' 


ACM] 


ACM[E1 133 2]] 


MUI; 315 3 12 
M 


3 12 
41 13 


Reshape to produce a 2x3 matrix 
Display of an array of rank >i 
is preceded by a blank line 


A 2x4 matrix of characters 


A matrix reshaped to a vector 


Elements in row-major order 


Indexing (third element of P) 
A vector index 

The first three elements of P 
Last element of P 
Element in row 1, column 2 of M 
Row 1 of M 
Rows 1 and 1, columns 3 2 


The alphabet to Q 
A matrix index produces 
a matrix result 


Respecifying the first row of M 


a2 
= 
5 
WAS 1 
7 
2 3 
Oo 1 
WAS 0 
de <2 
2 1 

7 

5 

ak 

1 

4 


@#3) 1 6-2 4 6 
PLQ] 


JORIGIN 0 
PL3] 


PLO 1 2] 
5 

15 

2 3 4 
JORIGIN 1 


15 
3 


A permutation vector 
Permutation of P 


A new permutation 
Present index origin is l 


Set index origin to 0 


First three elements of P 


Result of index generator . 
begins at origin 


FUNCTIONS ON ARRAYS 
Vector of 3 random integers (1-9) 


Random 3 by 3 matrix 
Random 3 by 3 matrix 


Sum (element-by-element) 


x/V 


143 22 12 


X*1,5 


1 


+/(1 20X)*2 


O/1 2,X 


0,.07067822453 


Y<o/0 2,X 


Y 
0.9974949866 

Y=10X 
1 


M+.xWN 


79 123 

46 84 

84 95 
Mt+.<N 


81 


58 
66 


Maximum 


Comparison 


Sum-reduction of V 

Product-reduction 

Sum over first coordinate of M 
(down columns) 

Sum over second coordinate of M 
(over rows) 


Sum over last coordinate 


Maximum over last coordinate 


Sin squared plus Cos squared 
Sin Cos X 


(1-(COS X)*2)*.5 


An identity 


Ordinary matrix (+.x inner) 
product 


An inner product 


+.x inner product with vector 
right argument 


be 


= 


49g 
35 


7 
Ve,x15 
4 6 8 
2 3 4 

14 21 28 
Yo, <19 
ees ees eed Ee 
pee as ae a 
00011 
Vo.,xM 

18 8 

16 2 

10 14 
9 4 
8 1 
5 7 

63 28 

56 7 

35 49 
Q<710p5 
@ 
3 4 5 
+/LilQo.= 
1 4 1 
2 10M 

5 1 

8 5 

1 7 
QM 

5 1 

8 5 

1 7 


Outer product (times) 


Outer product 


An outer product of rank 3 


A blank line between planes 


MIXED FUNCTIONS 


A random 10 element vector 
(range 1 to 5) 


Ith element of result is number 
of occurences of the 
value I in Q 

Ordinary transpose of M 


Ordinary transpose of M (monadic) 


“T<2 3 49124 An array of rank 3 
£ 


3 1 27 Transpose of T (dimension 
of result is 3 4 2) 


1 18M Diagonal of M 


1 1 2a7 Diagonal section in first 
two coordinates of T 


17 18 #19 20 
X<0(0,15)76 


)DIGITS 4 Set number of output digits to 4 
WAS 10 
81 2 3°0,0X% 
0.000F0 41. 000HO 0.000F0 Table of sines, cosines,and 
5.0008 1 8.660F 1 5.774E 1 tangents in intervals 
8.660EF 1 5.000F 1 1.732E0 of 30 degrees 
1.000F0 1.744EF 16 5.734815 


8,660F 1 ~5,.000F°1 ° 1.7320 
5,000F 1 ~8.660F 1  5.774E 1 


A.1l 


uy 3 yu 5 uy 
30Q 
B. Jt De - 4.” okt 
~30Q 
if ot. 
0 1 2oC1]1M 
g 2Be OF 
Bo 5. ak 
i ee. Sa 
“2o[ 2] 
Go ei 7 
re ee 
an ae 
1 2 36M 
9 4 7 
1 5 8 
i OB. 8 
’Q 
We ee Be . A 
ofitu 
1 5 #7 
5 8 1 
Ps og ty 
OM 
4 9 7 
1 8 5 
a 5 3 


Rotate to left by 3 places 
Rotate to right by 3 places 


Rotate columns by 
different amounts 


Rotation of rows all 
by 2 to right 


Rotation of rows 


Reversal of Q 


Reversal of M along 
first coordinate 


Reversal along last coordinate 


U<Q>4 


U 
0 0 0 0 t 0 0 0 0 0 
U/Q Compression of Q by logical 
5 vector U 
(-U)/Q Compression by not U 
4 4 3 4 4H 2 4 4H 2 
+/U/Q 
5 
1 0 1/{£11M Compression along first 
coordinate of M 
7 9 4 
4 5 #7 
1 0 1/M Compression along last 
coordinate 
7 4 
Se st 
41 7 
(,M>5)/,M Mis 794581431057 
PB. Be 7 All elements of M which exceed 5 
V+1 0404 
V\13 Expansion of iota 3 
de oP 7205 GO oS . 
V\M Expansion of rows of M 
7 0 9 0 4 
5 0 8 0 1 
: 0 5 0 7 
V\'ABC! Expansion of literal vector 
ABC inserts spaces 
1011 77 6 Base 10 value of vector 177 6 
1776 
811776 Base 8 value of 177 6 
1022 
(4910)T1776 4 digit base 10 representation 
1 7 7 6 of number 1776 
(3p10)T1776 3 digit base 10 representation 
7 7 6 of 1776 
10 1071776 
7 6 
1071776 
6 
24 60 6011 3 25 Mixed base value of 1 3 25 
3805 (time radix) 
24 60 60T3805 Representation of number 3805 
1 3 25. in time radix | 
241 011 =°0 Base 2 value 
22 


A.13 


M 


7 .9 4 
5 8 1 
1 5 7 
JORIGIN o 
WAS 1 
ML2;0] Indexing of matrix in 0-origin. 
£ Note relation to indexing of 
(,M)C(oM)12,0] ravel of M 
1 
YORIGIN 1 Restore l-origin 
WAS O 
P 
2 3 5 7 11 13 
Pil Index of 7 in vector P 
4 7 is 4th element of P 
Pié 6 does not occur in P, hence 
7 result is i1+pP 
Pil 5 6 7 
wi 3 7 yo : 
a5 132 4 A permutation vector 
R<Q110@ Ris the permutation inverse to Q 
R 
2 4 3 5 1 
@LR] 


4 22 3 4 5 
A«+'ABCDEFGHIJKLMNOPQ' 
A+A,'RSTUVWXYZ! 


A A is the alphabet 
ABCDEFGHISKLMNOPQRSTUVWXYZ 

Ai'ct Rank of letter C in alphabet is 3 
3 

J+Ai'CAT! 

J 
3 12 20 
ALJ] 
CAT 


M+3 59'THREESHORTWORDS ' A matrix of characters 


THREE 
SHORT 
WORDS 
JAM Ranking of M produces a matrix 


Ald] Indexing by a matrix produces 
a matrix 
THREE 
SHORT 
WORDS 
375 Random choice of 3 out of 5 
5 1 2 without replacement 
675 
DOMAIN ERROR 
675 
A 
X*878 A random permutation vector 
x 
4 6 7 2 5 al 8 3 
AX Grading of X 
6 4 8 1 5 2 3. ~=«C7 
XCAX] Arrange in ascending order 
1 2 3. 4 5 6 7 8 
XC WX] Arrange in descending order 
8 7 6 5 4H 3 2 4 
U<Ae'NOW IS THE TIME Membership 
a Da Be 000 
00001001100011100011001000 
U/A 
EHIMNOSTW 
(18)e3 7 5 


o 0 1 0 24 0 4 0 


Appendix B 
ADVANCED EXAMPLES 


This section presents a set of examples less elementary 
than those of Appendix A. These examples are all contained 
in Workspace ADVANCEDEX of Library 1. A user may therefore 
load, use, and trace any of the functions as an aid to 
understanding their behavior. Displays of intermediate 
results may also be inserted. For example, the statement 


P<«(P,0)+0,P 


occurring in a function could be changed (perhaps by the use 
of line editing) to the following form: 


O<+P<«(O<+P,0)+0+0,P 


Fach execution of the statement will now perform as before, 
except that each of the results 0,P and P,0O and P will be 
typed out as well (in that sequence). 


Programming techniques can be learned from a similar 
study of any well-written set of functions. All of the 
workspaces of library 1 may be used as a source of functions 
for such study. 


The index origin in the workspace ADVAWCEDEX is set to 
1. 


)LOAD 1 ADVANCEDEX 
ADVANCEDEX SAVED 07/20/68 28.12.10 


)FNS 
AH ASSOC BIW COMB DTH ENTER F FC 
Ce GCP GCV HILB HTD In INV INVP 
INt LFC LOOKUP PACK PALL PER PERM PO 
POL POLY POLYB RESET TIME TRUTH UNPACK ZERO 
)VARS 
~ DAH DASSOC DBIN DCOMB DDTH DENTER DESCRIBE 
DF DFC DGC DGCD DGCV DHILB DHTD DIN 
DINV DINVP DIN1 DLFC DLOOKUP DPACK DPALL DPER 
DPERM  DPO DPOL DPOLY DPOLYB DTIME DTRUTH DUNPACK 


DZERO TIMER 
DESCRIBE 


FACH OF THE VARIABLES OF THIS WORKSPACE WHICH BEGINS WITH THE 
LETTER D IS THE DESCRIPTION OF THE FUNCTION WHOSE NAME IS 
OBTAINED BY REMOVING THE D. FOR FURTHER DETAILS SEE APPENDIX 
B OF THE APL\360 USER'S MANUAL. 


DPACK 


THE FUNCTIONS PACK AND UNPACK ILLUSTRATE THE USE OF THE 
ENCODE AND DECODE FUNCTIONS IN TRANSFORMING BETWEEN A FOUR- 
NUMBER ENCODING OF SERIAL NUMBER (1 TO 9999), MONTH, DAY, 
AND YEAR, AND A SINGLE-NUMBER ENCODING OF THE SAME DATA. 


VPACKLOIV 
V Z+PACK X 
C1] Z* 10000 12 


VUNPACKLOIV 
V Z+UNPACK X 


31 100 1X-1 


[1] Z+1+ 10000 12 31 100 TX 


P+PACK 2314 

P 
86063867 

UNPACK P 
2314 7 #17 #468 

UNPACK PACK 
2311 9 214 £72 

PACK UNPACK 
92137142 

PACK 1 1 31 
3000 

UNPACK 3000 
14 i 31 1 


7 17 #68 


2311 9 21 72 


92137142 


1 


DENTER 


THE FUNCTIONS ENTER, LOOKUP, AND RESET ILLUSTRATE A METHOD 
OF CONSTRUCTING AWD USING LISTS OF VARIABLE LENGTH DATA, 
REPRESENTING EACH LIST BY A VECTOR OF CHARACTERS AND A 
VECTOR OF INDICES. ENTER AND LOOKUP EACH REQUEST INPUT (BY ®) 
UNTIL AN EMPTY VECTOR (CARRIAGE RETURN ALONE) IS ENTERED. 


RESET RESETS LISTS (USE BEFORE ENTER AWD LOOKUP). 
ENTER ACCEPTS SUCCESSIVE ITEMS OF NAMES AND DATA. 
LOOKUP PRINTS DATA ASSOCIATED WITH EACH NAME ENTERED. 


VENTERCOIV VLOOKUPLOIV 
VY ENTER;X VY LOOKUP3X3d 
[1] 'ENTER NAME' C44 da 
[2] Xx< 0 E2] Xx+ 0 
[3] >0x10=0X [3] >Ox10=0X 
C4] NAMES«NAMES ,X C4] J<(((14P1)-14P1)=9X)/1 1t+pP1 
bs P1<P1i,oNAMES eee J<+(NAMESCP1ALJ]°.+19X]A.=X)/od 
[6] ‘ENTER DATA' [6] +(0 1 =p7)/ 10 8 
C7] DATA<DATA, [7] >+1,o00«'MORE THAN ONE SUCH NAME' 
[38] P2+P2 ,oDATA [8] DATALP2CJ]+1-/P201 0 +71) 
C9] rt [9] >1 
[10] +1 [10] ‘WO SUCH NAME! 
V [ii] 71 
Vv 
VRESET(LOIV 
VY RESET 


bad NAMES<DATA<p P1*+P2<0 


RESET 

ENTER 
ENTER NAME 
J. ARMSTRONG 
ENTER DATA 
PRESIDENT 


ENTER NAME 

H. LEVINE 
ENTER DATA 
VICE-PRESIDENT 


ENTER NAME 


LOOKUP 
? 
H, LEVINE 
VICE-PRESIDENT 
? 
L. YAVNER 
NO SUCH NAME 
? 


DIN 


THE FUNCTIONS IN AND IN1 TAKE TWO ARGUMENTS; THE FIRST IS A 


WORD (I.E., A VECTOR) WHOSE OCCURRENCES IN THE SECOND 
ARGUMENT ARE TO BE DETERMINED, THE RESULT IS A VECTOR OF 
INDICES OF THE FIRST LETTER OF HACH OCCURRENCE. THE 
FUNCTION IN DETERMINES ALL OCCURRENCES, WHEREAS IN1 


DETERMINES ONLY ALL WNON-OVERLAPPING OCCURRENCES BY FIRST 
APPLYING THE FUNCTION IN AND THEN SUPPRESSING ALL OVERLAPS., 


VIWLOIV 
V 2+A IN BsJ 
C1] J+(AL11]=B)/ipB 
[2] J+(JS14+(pB)-pA)/aJ 
[3] Z<(BLJo,+ 1+1pAla, =A) /ad 


VINALOIV 

V T<A IN1 B 

ca] T<A IN B 
[2] 22xJ<pT«(~(ipPyeJ<1+((p4)>|-/£1](2,1+9 7) pP%)i1)/7 


W<'THE' 
T<'THE MEN THEN WENT HOME,'! 
WIN PT 
i 9 
W IN1 T 
1 9 


"ABA' IN 'NOWABABABABABABABA' 
4 6 8 10 42 44 16 

"ABA' IN1 'NOWABABABABABABABA' 
4 8 12 £16 


DTRUTH 


THE FUNCTION TRUTH PRODUCES THE MATRIX OF ARGUMENTS OF THE 
TRUTH TABLE FOR WN LOGICAL VARIABLES. 


VTRUTHLOIV 
VY Z<TRUTH WN 
L141] Z<2|LC714+12*V)°o, s2*N-1N 
Vv 
TRUTH 3 


BPRPRERROOOO 
PROORRKAOo 
FRORORORSO 


(TRUTH 3)+.xO2* 1413 
O 1 2 3 4 5 6 7 


DGCD 


THE FUNCTIONS GCD AWD GC EACH EMPLOY THE EUCLIDEAN ALGORITHM 
TO PRODUCE THE GREATEST COMMON DIVISOR. GCD EMPLOYS TWO 
SCALAR ARGUMENTS, WHEREAS GC EMPLOYS A SINGLE ARGUMENT WHICH 
IS EXPECTED TO BE A TWO-ELEMENT VECTOR. 


THE FUNCTION GCV YIELDS THE GREATEST COMMON DIVISOR OF ALL 
ELEMENTS OF A VECTOR OF TWO OR MORE ELEMENTS. 


VGCDLOIV 
VY Z<M GCD N 
Lad Z<M 
[2] M<+M |W 
C3] N<Z 
[4] +O02M 
Vv 
VEclLOlv 
V Z2+GC M 


[1] >0#414M<oOM[1],2<!/M 
VGCVLOIV 
V Z+GCV W3A 
[1] +1#9W+Z,(Az0)/A<(Z+L/W) |W 
84 GCD 30 
90 GCD 84 
GC 90 84 
GCV 90 84 


GCV 90 84 105 


DBIN 
THE FUNCTION BIN PRODUCES ALL BINOMIAL COEFFICIENTS UP TO ORDER WN 
VBINLOIV 
“Vv Z<BIN WN 
[1] Z+LQ(0,1WV)°.'0,1N 
Vv . 


BIN 4 


PRBRPRE 
FOWONRO 
NAwrFoo 
FROCO 
<oolole) 


DPOLY 


THE FUNCTIONS POLY, POL, PO, AND POLYB EACH EVALUATE A 
POLYNOMIAL (OR POLYNOMIALS), WHOSE COEFFICIENTS ARE 
DETERMINED BY THE FIRST ARGUMENT, AND WHOSE POINT (OR 
POINTS) OF EVALUATION IS DETERMINED BY THE SECOND ARGUMENT. 
THE COEFFICIENTS ARE IN ASCENDING ORDER OF ASSOCIATED 
POWERS . 


POLY SCALAR RIGHT ARGUMENT ONLY. 

POL SCALAR RIGHT ARGUMENT OWLY (USES INNER PRODUCT). 

POLYB SCALAR RIGHT ARGUMENT ONLY (USES BASE VALUE). 

PO APPLIES TO ARGUMENTS OF ANY RANK, THE VECTORS ALONG 
THE FIRST COORDINATE OF THE FIRST ARGUMENT ARE THE 
COEFFICIENTS OF THE POLYNOMIALS WHICH ARE EVALUATED 
FOR EACH ELEMENT OF THE SECOND ARGUMENT. 


VPOLYLUIV VPOLYBLOIV 
V 2<C POLY X V Z<C POLYB X 
C1] Z++/CxX*x 1+19,C [1] Z*+X1LOC 
Vv Vv 
VPOLLOIV VPOLOIV 
V Z2<C POL x V Z2<«C PO X 
C1] Z<(X* 14+109,0)+.xC . £1] Z<(Xo0,* 14+11ppC)+.xC 
Vv Vv 
C+#1 2.3 4 
C POLYB 3 


(C POLY 3)a.=(C POLYB 3),(C POL 3),C PO 3 


CPO 12.3 4 5 6 
10 49 442 313 586 985 


O+M<+QBIN 5 

1 1 1 1 1 1 

) 1 2 3 yy 5 

0) O07 1 3 6 10 

0 0) 0 1 4 10 

0 0 0) 0 1 5 

0 0 0 0 0 1 
LM PO 16 
1 2 4 8 16 32 
1 3 9 27 81 243 
1 4 16 64 256 1024 
1 5 25 125 625 3125 - 
1 6 36 216 1296 7776 
1 7 4Q 343 2401 16807 


DTIME 


THE FUNCTION TIME YIELDS THE AMOUNT (IN MINUTES, SECONDS, 
AND 60THS OF A SECOND) OF CPU TIME USED SINCE ITS LAST 
PREVIOUS EXECUTION. IT IS USEFUL IN MEASURING THE EXECUTION 
TIMES OF OTHER FUNCTIONS. THE VARIABLE 'TIMER' IS ASSIGNED 
THE VALUE OF THE CUMULATIVE CPU TIME AT EACH EXECUTION OF 
THE FUNCTION TIME. 
VTIMELDIV 
V Z+TIME;T 
C1] 2+ 60 60 60 T( %*«121)-TIMER 
[2] TIMER<T 
Vv 
DCOMB 


THE FUNCTION COMB EMPLOYS RECURSIVE DEFINITION TO PRODUCE A 
2'N BY 2 MATRIX OF ALL POSSIBLE PAIRS OF ELEMENTS FROM iN. 


THE FUNCTION FC SHOWS AN ALTERNATE METHOD WHICH YIELDS THE 
SAME PAIRS BUT IN A DIFFERENT ORDER. 


THE FUNCTION LFC EMPLOYS FC TO GENERATE LETTER PAIRS. 
VCOMBLUIV 
V C+COMB N;A3B 
[1] 20x <2 
[2] +O0x1N=2x1ipcC+ 1201 2 
[3] A<COMB N-1 
C4] C+((94)+(N-1),0)9€,4),,¢01¥-1)°. 70," 


VFCLOIV 
V CFC N3A3B 
i B<«(il)°o.+Np0 
[2] A+(1N)°, +1 
C34 C<(2,NxN)p(,B),,4 
C4] C+Q(CD2;1sN)/C 


VLFCCOIV 
VY Z<LFC N 
[1] 3+" ABCDEFGHISJKLMNOPQRSTUVWXYZ'[FC NJ 


TIME 
0 @ 35 
TIME 
Gx Oye! 
COMB 4 FC 4 LFC 4 
% 2 ae 4 AB 
#9253 1 3 AC 
2 8 1 4 AD 
1 4 2 3 BC 
F & o he BD 
3.4 3 44 CD 
TIME TIME TIME 
O “O42 0 0 8 © O&O F 


Z*+COMB 15 ZFC 15 


oZ OZ 
105 2 105 2 
TIME TIME 
Oo 1 4 0 O 29 
DDTH 


THE FUNCTIONS DTH, HTD, AND AH CONCERN HEXADECIMAL NUMBERS 
LIMITED TO 8 DIGITS AND EMPLOYING THE CHARACTERS 


O123456789ABCDEF. NEGATIVE NUMBERS ARE REPRESENTED IN 2'S 
COMPLEMENY FORM, WITH ANY OF THE CHARACTERS 8 THROUGH F IN 
THE LEFTMOST POSITION (OF EIGHT). LEADING ZEROS MAY BE 
OMITTED, 


DTH CONVERTS DECIMAL TO HEXADECIMAL. 
HTD CONVERTS HEXADECIMAL TO DECIMAL. 
AH ADDS HEXADECIMAL NUMBERS. 


VDTALOIV 
V R<DTH X 
[1] R+,('0123456789ABCDEF! )[1+(8p16)TX] 


VATDCOIV 
V R*HTD X 
C1] R+((8-p,X)p'0'),X 
[2] R«l (162 1+'0123456789ABCDEF'iR)-(2*32)xR[1]e'89ABCDEF! 
E34 s4Uxea/Xe'0123456789ABCDEF! 


C4] R<'! 
[5] "NUMBER IS NOT HEX' 
Vv 
VAALOIV 
V R+A AH B 
1] R<DTH(HTD A)+HTD B 
Z<DTH 1776 
z 
000006FO 
HTD Z 
1776 
2 AH Z 
00000DEO 
HTD Z AH Z 
3552 
HTD '000006FO0! 
1776 


HTD *90000000! 
“1879048192 

HTD -'O0O0O049HFG! 
NUMBER IS NOT HEX 


DZERO 


THE FUNCTION ZERO EMPLOYS THE METHOD OF FALSE POSITION TO 
DETERMIWE TO WITHIN A TOLERANCE TOL A ROOT OF THE FUNCTION F 
LYING BETWEEN THE BOUNDS BlL1] AND BL2]. IT IS ASSUMED THAT 
F BC1] AND F BL2] ARE OF OPPOSITE SIGN. THE FUNCTION F IS A 
SPECIFIC POLYNOMIAL, BUT CAN BE CHANGED TO ANY DESIRED 
FUNCTION. 


VZEROLOIV 
VY Z<TOL ZERO B;T 
[1] >Ox1TOL=|T«F Z+0.5x+/B 
fey >1,BL21(0<7)#0<F BJ+Z 


VFCLOIV 
V 2<F X 
[i] Z+ ~2018 3°51 POX 


169 12 "29 ~20 3 4 FJ 3836 145 


O<R<1E°6 ZERO ~2 “1 
“4 ,845121413 


TIME 
0 2 36 
FR 
7.14440814E 7 
TIME 
Or. > 32 


O<FO<R<1F 10 ZERO 1 2 
1.26397094 
74.813305062F 11 

TIME 
0 3 46 

O«FO<R<+1E 6 ZERO 1 2 
1.,263970852 , 
“g,51888359F 7 

TIME 
Oo 2 43 


DHILB 
THE FUNCTION HILB PRODUCES A HILBERT MATRIX OF ORDER NV, 
VAILBCLOIV 
VY Z+HILB N 
C1] Zt 1+(1N)o., +1 
HILB 3 
1 0.5 0,.3333333333 


Ane) 0. 3333333333 0.25 
0.3333333333 0.25 0.2 


(2) 


DINV 


THE FUNCTIONS INV AND INVP EACH PRODUCE THE INVERSE OF THE 
MATRIX ARGUMENT SUPPLIED, EMPLOYING GAUSS-JORDAN CL Ess 
COMPLETE) ELIMINATION, INVP EMPLOYS PIVOTING AND INV DOES 
NOT. 


THE FIRST LINE APPENDS THE UNIT VECTOR 12>1N AS THE ZLAST 
COLUMN OF THE ARGUMENT AND THE SECOND LINE (LINE 4 IN INVP) 
PERFORMS AT EACH ITERATION ONE OF THE N COMPLETE INVERSIONS 
REQUIRED. SEE EXERCISE 1.40 OF IVERSON, A PROGRAMMING 
LANGUAGE, WILEY, 1962. 
VINVLOIV 

VY Z2<INV MsI3 
(Ag M<Q(1 0 +pM)0(, QM) ,~J<1<1I<1 tom 
[oy M+106(J,1)601]M-(JxM[ 31])°.xME[13]<M[1;]+M0131] 
[3] +2x104I+I-1 
C4] Z+MCL31itoM] 


VINVPLOIV 

V Z<INVP M3I3J3K;P 
C1] M<Q(1 0 +0M)p(,8M¢),~7+1<P<1I<1 tom 
[2] MUK,131pP]<ML1,kK<(|MLits1])if/IM0Cir3s11319P] 
[3] P<1OP,0pP[K,1]+P[1,K] 
C4] M<10(7,1)O[11M-(JxM[ 31])o.xMO013;]<M[13;]2M0131] 
SJ +2x10#47+I-1 
[6] Z<ML ;4P] 


O<+WV<INV M<HILB 3 


9g “36 30 
“36 192 “180 
30 “180 180 
M+.xN 
1.000000000F0 2.842170943EF 14 ~6.039613254R 14 
1.421085472F 14 1.000000000F0 “1.065814104F 14 


4,662936703F 15 3.197442311F 14 1.000000000F0 
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DPALL 


THE FUNCTION PALL PRODUCES THE MATRIX OF ALL PERMUTATIONS OF 
ORDER N. THE FUNCTION PERM WHICH IT USES PRODUCES THE B-TH 
PERMUTATION OF ORDER N BY A METHOD DUE TO L.d.WOODRUM. 


THE FUNCTION PER EMPLOYS RECURSIVE DEFINITION , AND PRODUCES 
ALL PERMUTATIONS BY A METHOD MUCH FASTER THAN THAT USED IN 
THE FUNCTION PALL. THE PERMUTATIONS ARE PRODUCED IN THE 
OPPOSITE ORDER. 


VPALLLOIV 
V Z2+PALL N3T 
| Z+((!N),NV)p0 
{2] I+ 
[3] ZLI3;1<N PERM I 
C4] +3x(!N)2I<I+1 


VPERMLOIV 
V Z<A PERM B;3I;Y 
fi] I<pZ<+1+(014 )TB-1 
[2] >0x10=f<f-1 
C3] 20 Y1<2Z0YI)+2Z071<Z0Y+I+1A-I] 
C4] +2 


VPERCLUIV 

VY P<PER M3X3Y32Z 
C1] +Ox1M=P+ 1 1 pl 
L2] Z*+PER M-1 
[3] P<1X+<0 
oe +OxKIM<X<X4+1 
[5] Y(~(iM)eX)\Z 
C6] YL 3X 1+ 
L7] P<((Xx!M-1),M)p(,P),..2 
[8] +4 


PALL 3 


WWNN FF 
NOP WOR Wh 
POR WN Ww 


TIME 

0 3 7 
Z<PALL 3 
TIME 

0 0 4g 
Z+PALL 5 
TIME 


DASSOC 


THE FUNCTION ASSOC TESTS ANY PUTATIVE GROUP MULTIPLICATION 
TABLE M (ASSUMING GROUP ELEMENTS i1poM) FOR ASSOCIATIVITY 
AND YIELDS A VALUE 1 IF IT IS ASSOCIATIVE, 0 OTHERWISE. 


VASSOCLOIV 
V 4*<ASSOC M 
Li] Z+A/ MLM; 1=ML 3M] 


Vv 
M<(15)05 5015 
M 
i | a ee, | 
3 4 5 1 2 
Bes iB =f Bee ag 
B 4 oa 
4 2 2 4 5 
TIME 
Or. ke 
ASSOC M 
il 
TIME 
0 0 9 
M<0 01 0 OomM 
M 
O° 8 th. 5. 4 
3 4 5 14 2 
Bt. (2 eB. 1k 
Bet SU ABe OE 
a re: ae 
ASSOC M 
0) 
TIME 
0 oO 10 
M+?10 10910 
pM 
10 10 
TIME 
O° .-s9? 36 
ASSOC M 
0 
TIME 
0 Oo 45 
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)LOAD 1 NEWS 
SAVED 10.44.08 07/12/68 


DESCRIBE 


THIS WORKSPACE PROVIDES INFORMATION ABOUT THE OPERATION AND 
USE OF APL, THE FUNCTIONS OF INTEREST TO THE USER ARE 
APLNOW, INDEX, PRINT, AND SCHEDULE. 


APLNOW TAKES AS ITS SINGLE ARGUMENT A THREE-ELEMENT VECTOR 
REPRESEWTING A DATE, AS MONTH, DAY, YEAR. APLNOW PRINTS 
WOTES ON THE STATUS OF THE APL SYSTEM; FOR INSTANCE, 
RECENTLY ADDED FEATURES, TEMPORARY RESTRICTIONS, OR ADVICE 
ON PROGRAMMING OR TERMINAL OPERATION. ONLY THOSE WNOTES 
ENTERED INTO APLNOW ON OR AFTER THE DATE GIVEN AS AWN 
ARGUMENT ARE PRINTED. 


INDEX TAKES NO ARGUMENT. Iv PRINTS INDICES, DATES, AND THE 
FIRST FEW WORDS OF EACH NOTE IN APLNOW., 


PRINT TAKES AS ITS SINGLE ARGUMENT THE IWDEX (AS INDICATED 
BY THE INDEX FUNCTION) OF A NOTE FROM APLNOW, AND PRINTS THE 
NOTE, 


SCHEDULE TAKES NO ARGUMENT. IT INDICATES THE REGULAR DAILY 
APL SCHEDULE, AND ALL ANTICIPATED DEVIATIONS FROM THE NORMAL 
SCHEDULE. 
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Absolute value Comment 3,45 
see Magnitude Communication commands 2.5 2.32-33 
Account number 1.8 2.2-3 2.23 action and notes 2.33-35 
2.28 table 2.7 
Accounting information 1.11 2.10 Comparison 3.8 A.9 
ALREADY SIGNED on 1.9 2.7 Complete beta function 3.9 
And 3.5 3.7 3.9 3.34 Compound character 3.3 
Announcements, public address 1.9 Compound expression 3.3 3.14 
2.32 Compress 3.38 3.41-42 A.13 
APL Computer 
character set 1.3 access 1.1 
exercise 4,5-6 failure 2.8 
information B.13 time used 1.11 3.47 
operations 2.1-3 2.5 Conformability 3.33 3.36 
Application packages 2.13 Connection 
Arccos 3.7 broken 1.6 2.4 2.8 2.10 
Arccosh 3.7 computer I1.1 
Arcsin 3.7 establish 1.4-6 
Arcsinh 3.7 hold 2.11-12 
Arctan 3.7 A.2 Constants 3.2 
Arctanh 3.7 A.2 CONTINUE 1.11 2.7-9 2.11-12 
Arguments 3.5 3.8+9 3,11 3.14-16 Continuity of work 2.22 
3.28 3.37 3.41-44- Coordinates of array 3.32 3.35 
left 3.8 3.37 
right 3.3 COPY 2,7 2,13-14 3.33 
Array 3.26-33 A.6-8 action and notes 2.15-18 
extend scalar functions to 3.5 Correction 1.7 A.1l A.4 
3.33 2 at Cosh 3.7 
functions on 2.20 3.33-36 4.3 Cosine 3.7 A.2 
A. 8-10 
Arrow 3.1-5 3.21 3.24 
Associativity test B.12 
Asterisk 2.30 3,21 Data button 1.6 
Attention 1.7 2.4 3.1 3.18 Date 3.47 
Date response 2.9-10 
Backspace 1.7 3.3 Deal 3.7 3.38 3.45 
Base value 3.42 A.13 Decimal form 3.2 4.3 
Beta function 3.9 Decode 3.38 3.42 B.2 
Binomial coefficient 3.7 A.5 B.5 Defined function 2.3 3.1-16 A,3 
Body of defined function 3.10-11 example 3.11 A.3 
A.3 explicit argument and result 3.14 
Bounce 2.8-9 2.11 3.15 ; 
Brackets 3.10 3.17 list names of 2.28 
Branch 3.1 3.11 3.20-21 3.45 start and end 3.10 
A.3 ; table of forms 3.15 
example 3.12 use 3.16 
Business accounting 2.13 . variables made local to 3.13 
Byte 3.46-47 Definition mode 2.5 3.17 
end 3.18 A.3 
Caret 3.3 reestablish 3.19 
Catenation 3.27 3.29 3.38 4.2 DEFN ERROR 3.4 
Ceiling 3.7-8 A.2 Del 3.10 3.17-19 
Character Del tilde 3.19 
error 3.4 Delete 3.17-19 
input 3.24-25 DEPTH ERROR 3.4 
output 3.26 3.33 Diagonal 3.39 A.11 
Characteristic 3.43 DIGITS, output maximum 2.7 2.21 
Circle function 3.34 4.7 
Circular functions 3.7 Dimension 3.5 3.26-29 3.35 
CLEAR 2.7 2.14 3.33 Dimension and rank table 3.27 
CLEAR WS 2.6 2.15 Disconnect 1.10 2.8 2.11 
Column 3.30-32 3.35 3.42 A.7 Display 3.17-18 A.4 
Column catenator 4.2 Divide 3.7 3.34 
Colon 2.,2-3 2.10 2.14 3.17 DOMAIN ERROR 3.4 3.44 4,3 
Combinations B.7 _ Drop 3.38 3.44 
Comma 3.27-28 DROP 2.7 2.22 2.27 
Commands 2.5-7 Dyadic functions 3.7-8 3.34 3.36 
table 2.7 Dyadic circle function table 3.7 


e 
see Exponential 


Edit 
in function definition 3.18-19 
A.5 
text 2.13 
Element-by-element 3.5 3.9 3.33 


A.1 


Empty array 3.29 3,33 
Empty vector 3.10 3.29 A.2 
Encode 3.38 3.43 B.2 


Entries 1.6-7 3.2 3. 
Epsilon 

see Characteristic 
Equal 3.7-9 3.34 
Equipment 1.1 1.2 
Erase 1.7 2.27 3.3 
ERASE 2.7 2.13 2.20 
Error 1.7 
Error report 3.3 3.5 


24 


3. 


during defined function 


table 3.4 
Evaluated input 3.24 
Evaluation, order of 


see Order of execution 


Exclusive or 3.9 
Execution mode 2.5 3. 
Execution, order of 


19 


see Order of execution 


Expand 3.29 3.38 3.4 
Exponential 3.7 
Exponential form 3.2 


2 


19 Aw5 


3.5 


A.13 


4,2-3 A.l 
Expression, compound 3,3 


3.14 


Factorial 3.7 3.9 3.16 A.3 


Floor 3.7-8 

FNS 2.7 2.28 3,22 

Function name 2.19 3. 
3.23 


2 


3.11 


Function definition 3.10-11 


3.17-19 A.4-6 
Functions 


see Circular, Defined, Dyadic, 
Halted, Library, Locked, Mixed, 
Monadic, Pendent, Primitive, 
Recursive definition, Scalar, 
Suspended, System dependent 


Fuzz 3.8 


Gamma function 3.9 


Gauss-Jordan elimination B.10 
Global object 2.3 2,.15-20 3.23 


Global variable 2.13-1 
A.3 

Grade up and down 3.38 

Graph 4.2 4.5 

Greater 3.7 3.9 


4 


3 


2.29 3.13 
244 


Greatest common divisor A.4 B.5 


GROUP 2.7 2.13-14 2. 
GRP, GRPS 2.7  2.29-30 


Halted function 2.3 2 
Header 3.13 3.15-19 
Hexadecimal number 8.8 
Homonyms 2.3 3,.22-23 
Hyperbolic functions 
see Circular functions 


19 


3 


222 
A.3 


2.29 
222 


2.30-31 


I-beam functions 3.20 3,46-48 
Identity element table 3.34 


IMPROPER LIBRARY REFERENCE 

2.26-27 2.31 
INCORRECT COMMAND 2,6-7 
INCORRECT SIGN-ON 1.9 2.7 
Index 3.26 3.38 


2.7 


INDEX ERROR 3.4 3.30 3.34 


Index generator 3.9 3.38 


A.2 


Indexing 3.26 3.30-33 A,14-15 


Index of 3.38 3.43 
Index origin 2.20 3,32-34 


A.8 


Inner product 3.5 3.33 3.35 A.9 


table 3.36 
Input 

character 3.25 

escape from loop 3.25 
evaluated 3.24 
position 1.8 2.4 


Input and output 3.23-26 A.6 
Inquiry command 1.8 2.5 2.28 


action and notes 2.28-32 
table 2.7 
Insert by backspacing 3.3 


Interrupt 1.1 2.4 2.9 3.20 


Iota 
see Index generator, Index 
Iteration counter 3.13 


Key 1.8 2.3 2.14 
Keyboard 1.3 

locked 1.6-8 2.32-33 
unlocked 1.10 2.4 2.34 
Keying time 3.47 


Label 3.17 
LABEL ERROR 3.4 


of 


3.24 


LENGTH ERROR 3.4 3.33 4.3 


Less 3.7 3.9 
LIB 2.7 2.31 
Library 2.2 
see Private, Public 
LIBRARY 1 4,1 
ADVANCEDEX B.1-12 
APLCOURSE 4.5 
NEWS B.13 
TYPEDRILL 4,8-9 
WSFNS 3.32 4.7 


Library control command 2. 
2,22-24 

action and notes 2,25-27 
table 2.7 

Library function 2.5 4.1- 

Library number 2.14 2.23 
LIBRARY TABLE FULL 2.9 

Line width 2.21 

List, construct and use B. 

LOAD 2.7 2.22 

Local variable 2.3 3.13 

Lock 2.3 2,10 

Locked function 3.5 3.9 

Locked keyboard 1.6-8 2.4 


Logarithm 3.7 
Logical function 3.5 3.9 
Logical result A.2 


5 


9 


3 
3.22 


SI, SIV 2.7 2.30-31 
Sign on 1.8-10 2.7 
Signum 3.7 A.3 
Sine 3.7 A.2 
Sine, cosine, 
Sinh 3.7 
Size 3.5 
Spaces 2.6 
Specification 
multiple 3.45 
State indicator 
3.48 A.5 
with local variables 
Statement 3.1 
end of 3.3 
invalid 3.3 3.5 A.2 
number 3.10-11 3.17-18 
Statistical calculations 
Stop control 3.19 3.21 
Storage 2.1 2.24 3.46 
Store workspace 2.25-26 
Suspended function 2.30 
3.48 
Symbols 
3.45 
SYMBOL TABLE FULL 
SYNTAX ERROR 3.4 
System command 2,1 2.5-6 
during function definition 
table 2.7 . 
System dependent function 
3.46-48 
table 3.47 
SYSTEM ERROR 3.4 
System information 


3.20-22 


tangent table A.11 
3.27 
3.2 

3.1 


3.38 


2.1 2.22 3.20-21 


3.22 


3.48 
2.13 


3.20-21 


3.5 3.7 3.24-25 3.38 


3.4 


3.19 


2.5 2.30 


1.9 3.46-48 


Tabular output 4.3 
Take 3.38 3.44 
Tangent 3.7 A.2 
Tanh 3.7 
Teaching 2.13 
Telephone number 1.5 
Terminal 
table of features and options 
1050 1.1 1.5 1.7-8 
2740 1.4-6 
2740-1 1.1 
. 2741 #%1,.1 1.4-6 2.4 
Terminal control command 2.5 
action and notes 2,9-12 
table 2.7 
Terminal, sample session at A.1-15 
Terminal modes 2.5 
Time 1.9 1.11 2.9 3.46-48 
Timer on 1050 terminal 1.8 
Times 3.7 3.33 
Time, student response 3.47 


1.2 


2.8-9 


B.7 


Trace 3.16 3.19 3.21 A.3 
Transmission signal 1.6-7 
Transpose 3.37-41 A.10-11 
Transposition table 3,40 
Trigonometric functions 
see Circular functions 
Trouble report 1.7 2.6 
table 2.7 
Typewriter entry 1.6-7 
A.1 


3.2 


User code 1.11 2.28 


Value 3.11 3.14-15 3.17 3.25 
3.45 ; 

VALUE ERROR 3.4 3.15 
Variables 

local and global 2.3 3.13 3.22 
names 2.1-2 2.19 3,22-23 

value 3.1 3.14 3.32 

VARS 2.7 2.29 3.22 
Vectors 3.9-10 3.26-27 3.35 A.l 


mixed functions apply 3.37 
numerical and character constant 
3.2 A.1 
scalar functions apply 3.9 
WIDTH 2.7 
Work session 
forced end 2.8 
to end 1.10-11 2.,10-12 
to start 1.8 
Workspace 1.9 2,1-2 
activate 2.,14-15 
active 2.13 2.28 
capacity 2.1 . 
clear 1.10 2.6 
continue 1.10 2.8 2.24 
identification 2.14 2.23 2.31 
identification change 2.22-23 
index origin 3.33 
information transfer between 
in libraries 4.1 
name 2,2-3 
purge an active 2,24 
replace stored with active 
stored 2.2-3 2.23 
Workspace control command 2.5 


2.21 3.25 4.7 


2.14 


2.13 


2.25 


2.13-14 
action and notes 2.15~22 
WS FULL 2.7 2.16 3.4 
WSID 2.7 2.31 
WS LOCKED 2.7 2.15 7 
WS NOT FOUND 2.7 2.15 2.27 


Zero of a function B.9 


Magnitude 3.7-8 
Material implication 3.9 
Mathematical statements 
Matrix 3.26-27 3.33 

A.15 

Hilbert B.10 

Maximum 3.7 3.34 A.9 
Membership 2.30 3.38 3.43 
Message 1.8 2.21 2.32-33 
MESSAGE LOST 2.7 2.33 
Minimum 3.7 3.34 
Minus 3.2 3.7 3.34 
Mixed functions 3.37-45 

names 3,5 

sample A,10-15 

table 3.38-39 
Monadic functions 3.7-8 
Monadic transpose 3.40 
MSG, MSGN 2.7 2.33-34 


3.1 
3.35 A.7 


2.2-3 2.14 
3.10 3.13 
active and latent referents 
3.23 
to obtain lists of 2.28-31 
Nand 3.7 3.9 3.34 
Natural logarithm 3.7 
Negation function 3.2 
Negative number 3.2 
NO SPACE 2.9 
Nor 3.7 3.9 
Not 3.7 
Not equal 3.7-9 3.33 
Not greater 3.7 3.9 3.34 
NOT GROUPED, NAME IN USE 2.7 2.19 
‘Not less 3.7 3.9 3.34 
NOT SAVED, THIS WS ITS wsid 2.7 
2.27 
SAVED, WS QUOTA USED UP 2,7 
2.27 
WITH OPEN DEFINITION 
2.25 3.19 
NUMBER IN USE 1.9 2.7 
NUMBER LOCKED OUT 1.9 2.7 
NUMBER NOT IW SYSTEM 1.9 2.7 
Number of terminals connected 3.47 


Names 2.19 2.23 


3.22 


3.7 Al 
3.34 


NOT 


NOT 2.7 2.16 


Numbers 3.2 3.5 3.26 
OBJECT WOT FOUND 2.7 2.16 
Occurrences B.4 

OFF 2.7 2.10-11 


Operator 1.4-5 1.8 
OPR, OPRN 1.8 2.7 
Or 3.5 3.7 3.9 
Order of execution 3.45 
compound expression 3.3 A.1 
defined function 3,11 
ORIGIN 1.7 2.7 2.20 
Out of 3.34 
Outer product 
Output 2.1. 
array 3.33 
fixed point 4,2 
heterogeneous 3.26 
maximum digits 2.21 
Overstrike 3.3-4 3.19 
3.35 3.41 3.45 


2.34-35 
3.34 


3.32 4.7 


3.5 
2.21 


3.33 
3.23 


3,35-36 
3.25 


3.25 


Parentheses in expression 3,3 
Parenthesis, right 1.8 2.5-6 
Password 1.8 2.3 2.10 

PCOPY. 2.13 2.18 ~ 

Pendent function 2.3 2.30 3.21 


Permutation 3.32 3.37 A.8 A.14 


B.1L 

Pi times 3.7 

Plus 3.7 3.34 

Polynomial B.6 

Ports 1.1 

PORTS 2.7 2.32 

Power 3.7 3.34 

Precision of numbers 2.21 3.5 

Primitive functions 3.1 3.7 3.14 
3.38 

names 3,5 


see Mixed, Scalar 
Printing element 1.1-3 
Private library 2.2-3 2.23 
Programming examples B.1-12 
Protecting copy command 2.13 
Public library 2.2 2.23 4.1 


2.18 


Quad 3.24-25 3.47 
Quotation mark 3.2 
Quote quad 3.25 3.47 


Radices 3,42 
Random 3.7 3.45 A.15 
RANK ERROR 3.4 3.33 
Rank of array 3.,26-27 
Ravel 3,.27-28 3.38 
Reciprocal 3.7 
Recording terminal 1.4 
2.32 2.34-35 
Recursive definition 
B,il 
Reduction 3.5 3.33-35 A.9 
Representation 3.43 A.13 
Request button on 1050 terminal 1.8 
RESEND 1.7 3.4 
Reshape 3.28 3.38 A.7 
Residue 3.7-8 3.34 
Response 1.9-ll 2.6 
table 2.7 
Results 3,2 
Return 1.6-7 
Reverse 3.38 
Revise 3.17 
Rho 
see Reshape, Size 
Roll 3.7 
Rotate 3.38 
Row 3.30-32 


4.3 
A.14 


2.8 2,24 


3.16 B.7 


2.10 A.1l 
3.14-15 
3.3 


3.41 A.12 


3.40 A.,12 
3.35 3.42 A.7 


SAVE 2.7 2,22 2.25-26 
Scalar 3.27 3.37 
Scalar functions 
extend to arrays 
sample A.2 
table 3.7 
Security 2.3 
Semicolon 3.13 


3.5-10 
3.33-36 


3.26 


